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Piszesz demo - D-Mon Ci pomoże 
Masz grę - chcesz nieśmiertelność 
- D-Mon Ci pomoże 

[i Chcesz wyciać muzykę badź grafikę 
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- D-Mon Ci pomoże 


Wspaniały całoekranowy edytor 

- po raz pierwszy w monitorze na Amigę. 
Wykorzystuje Multitasking. 

Disasemblacja oraz ogladanie pamięci 

w górę i w dół. 

Disasemblacja oraz asemblacja Copper'a. 
Wbudowany MemViewer. 


TO WSZYSTKO ZA JEDYNE 100.000 zł. 


Dystrybucja: ABUK sp z o.o 
Dział Kolportażu: 87-200 Wąbrzeźno, ul. 1 Maja 33. 


OD REDAKCJI 


OD REDAKCJI W numerze : 


Wadliwa dystrybucja „64 plus 4 Ś Amiga” przez przedsiębiorstwo 
RUCH jest przyczyną kłopotów, jakie mają czytelnicy chcący nabyć nasze 
pismo. Zdarza się, że otrzymujemy jako zwroty NIETKNIĘTE paczki 
zbiorcze. Tymczasem czytelnicy sygnalizują, że do wielu kiosków nie dociera 
ono wcale. Dlatego: 

zapraszamy wszystkich chętnych 
do prowadzenia kolportażu 
„64 plus 4 £ Amiga” 
(kluby, studia i sklepy komputerowe, księgarnie, 
osoby indywidualne itd.) do współpracy! 


Oferujemy korzystne warunki! 
Zainteresowanych prosimy o kontakt z działem dystrybucji pod 
adresem: Przedsiębiorstwo ABUK, 87-200 Wąbrzeźno, ul. 1 Maja 33. 


Od redakcji 

Z daleka I z bliska 

Uczymy się programować 5 
Ogłoszenia 

Hura! On mówi! 

Jak zrobić demo (C-64) .10 


Programy zwarlowane, 
ciekawe I takle soble ... 


Mikro gra 
Assembler 6510 (5) .... 
Graj aby wygrać 


Reklama 


Tworzymy własną 
bibliotekę 


Kącik początkującego 


NOWOŚĆ! 


PUBLIC DOMAIN PACK 
dla COMMODORE 64 
NA KASECIE! 


Jeszcze w tym roku ukażą się cztery kasety! 

Na naszych zestawach znajdują się programy, które do tej pory 
ukazały się na dyskach PDP, oraz wiele nowości! 

Pojedyńcza kaseta kosztuje 30.000zł, wykupienie prenumeraty do 
końca roku (4 kasety) kosztuje tylko 110tys zł. 

Wśród wszystkich, którzy zamówią komplet kaset (blankiet wpłaty 
zamieszczamy na str. 15) rozlosujemy 10 bezpłatnych prenumerat 
naszego pisma na rok 1992! 

Na blankiecie prosimy dopisać PDP-taśma. Spis zawartości kaset 
wewnątrz numeru. j 


Gracz doskonały 
Kurs języka C 
Kącik początkującego 


Magią I mieczem 
Telegram 
Spis PDP 


W następnym 
numerze: 


Przedsiębiorstwo ABUK S-ka z o.o. oferuje państwu szybką i tanią obsługę 
reklamową. Ogłoszenia drobne od osób indywidualnych (do 10 słów) przyj- 
mujemy bezpłatnie. Większe - 1000 zł za słowo. Reklamy ramkowe (minimal- 
ny format - 20 c m): tem? ogłoszenia -80002ł, cała strona - 3,0 min zł; kolor - odpowiednio 
100% drożej. 

Ogłoszenia przyjmujemy za pośrednictwem poczty (nasz adres - patrz stopka redakcyj- 
na). Treść ogłoszenia z określeniem formatu reklamy (ewentualnie zamówieniem koloru) 
prosimy nadsyłać listem poleconym wraz z odcinkiem wpłaty. Wpłat prosimy dokonywać 
za pomocą przekazu pieniężnego na konto Przedsiębiorstwa ABUK, Bank Polska Kasa 


Opieki SA Oddział w Bydgoszczy, konto nr : 5.0901 1-400522.7-136-11-111.0. Dołączenie 
do zamówienia odcinka wpłaty przyspieszy zamieszczenie reklamy 


e ARP Library 
cz. 2 


e AMIGA 
- powrót do 
BASIC'a? 


eCzy 
C-128D=128D? 


Adres redakcji: Redakcja „64 plus 4” 
GI EOCEJ LI Się wię 

skrytka pocztowa 64 
Redagują: _ Marcin Dudar, Sambor Kuźma, 


miesięcznik nr 11(13) listopad 1991 Paweł Sołtysiński, Waldemar 
cena I egz.: 8000 zł Szczygieł (red. nacz.), Krzysztof 


Kobuz. 
Okładka: Piotr Bartz. 
Wydawca: Skład: ABUK 
ABUK Spółka z o.o. Druk: Z.P. Wąbrzeźno 


Redakcja nie ponosi odpowiedzialności 
za treść ogłoszeń. 


NOWINKI 


***k W CO POGRAMY *** 


Koła w ruch! Para buch! Jak 
ta przysłowiowa lokomotywa 
rozkręcił nam się rynek progra- 
mów. Gry pojawiają się tak 
szybko, że niektóre nie zdążą się 


jeszcze znudzić gdy ich miejsce 


zajmują już następne. Firmy 
prześcigają się w kolorowych 
reklamach i wymyślnych for- 
mach promocji. Ale przejdźmy 
do konkretów. Oto co nas czeka 
w najbliższej przyszłości. 


*k* 


e Dobrze znana Sierra Online przy- 
gotowuje się do wielkiej promocji 
trzeciej części serialu „Police 
Quest”. Tym razem fabuła jest 
otoczona tajemnicą i z reklam nie 
można wywnioskować co będzie 
naszym celem w tej grze. Jednak 
z pewnością ciężko będzie się od 
niej oderwać, gdyż w odróżnieniu 
od poprzednich części tu mamy 
do czynienia z grafiką na pograni- 
czu digitalizy i rysunku. Warto 
będzie kupić oryginał, by po kilku 
dniach grania nie mieć przykrych 
przygód z błędnie skopiowanymi 
dyskami. Oprócz kontynua- 
cji:Leisure Suit Larry 5 (tak, 5 nie 
41), King Quest 5, Space Quest 4; 
będziemy mogli zobaczyć trzy 
nowe tytuły: Mixed up Fairy 
Tales, The castle of Dr.Brain, Eco 


Quest. Na uwagę zasługuje fakt, 
że firma postanowiła wznowićsta- 
re tytuły w nowej szacie graficz- 
nej. Jak narazie gotowe są 
pierwsze części gier „Leisure Suit 
Larry” i „Space Quest”. Nic tylko 
cierpliwie czekać lub wybrać się 
w kierunku najbliższego normal- 
nego sklepu z programami (czy- 
taj: na zachodzie). 


*k* 


Firma Domark znana z ostatnio 
zwielu konwersji gier salonowych 
przygotowała dla nas dwa tytuły. 
Pierwszy z nich to „Mig-29M 
Superfułcrum”, czyli unowocześ- 
niona wersja ich poprzedniego 
symulatora lotu. Ci wszyscy, któ- 
rym podobała się pierwsza część 
mogą w ciemno kupić drugą 
i napewno nie będą tego żałować. 
Druga z gier to przygotowany 
wraz z firmą Tengen konwersja 
bardzo popularnej gry coin-op 
pod tytułem „Pit-Fighter”. To 
z pewnością będzie hit i każdy 
będzie chciał zagrać w tą grę cho- 
ciaż raz. Dzięki digitalizowanym 
postaciom wałczących gra staje 
się prawie „symułatorem” walk 
wschodu. 


e Uwaga wszyscy entuzjaści Robo- 
cop'a. Ocean z myśłą o was wyda- 
je trzecią część sagi o metalowym 


strażniku prawa. Tym razem cały 
program oparty jest na wypełnio- 
nej grafice wektorowej. Oprócz 
walki z „niegrzecznymi” robota- 
mi-ninja, będzie można polatać 
jetpack'iem oraz prowadzić 
samochód. Cała gra reklamowana 
jest jako nowy rozdział w grafice 
3D. Zapowiadane są również 
adaptacja filmu „Hudson Hawks” 
pod tym samym tytułem, oraz 
symulator wolnej amerykanki 
„WWF” z Hulkiem Hoganem 
w roli głównej. 


***k 


Electronic Arts zapowiada konty- 
nuacje swoich dwóch najpopular- 
niejszych gier. Pierwsza z nich to 
„Popułos IT”, w którym poszerzo- 
no ilość opcji służących do nęka- 
nia przeciwnika, oraz ulepszono 
grafikę. Druga to dysk z danymi 
do gry „Powermonger” pod tytu- 
łem „The World War T”. Jeśli ktoś 
spodziewa się latających samolo- 
tów, to wcale się nie myli. Wszys- 
tko to ukaże się pod koniec roku 
1991. 


kkk 


Psygnosis w grudniu ma zamiar 
wywiązać się z obietnicy danej 
fanom gry „Shadow of the Beast”. 
Trzecia jej część (podobno ostat- 
nia) jak zwykle oszołomi nas prze- 
piękną grafiką i całą plejadą 
przeciwników. 


Robert *"Mr.Raf" Turliński 
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C-16 


Wskazówka nr 6: 
tylko ten, kto wie jak funkcjonuje jego komputer 
może w pełni wykorzystać jego możliwości. 


Dzisiaj przedstawiamy informacje, jak komputer 
przetwarza zmienne zmienno-przecinkowe i całkowite. 

W pierwszej części, szkic rozmieszczenia pamięci 
pozwolił początkującym zapoznać się z pamięcią użyt- 
kownika C-16 i Plus/4. Pamięć tą dzielą ruchome grani- 
ce, których aktualne adresy można każdorazowo odczytać 
ze strony zerowej (pierwsze 256 bajtów pamięci). 

Pod adresem 45 i 46 zawarte są młodsze (L) i starsze 
(H) bajty adresu początku zmiennych (patrz rys. 2 w po- 
przednim odcinku). Adres ten oznacza równocześnie 
koniec pamięci programu. Zwykle adres AD jest przed- 
stawiony łącznie jako 

AD=L+256xH 
łub rozdzielnie jako 
H=iNT(AD/256):L=AD-256xH. 

Komputer - w czasie pracy - posługuje się tym wskaź- 
nikiem. 

Przy funkcji FRE tworzy on różnicę wskaźników 
zawartych w komórkach 49/50 i 51/52 ograniczających 
obszar wolnej pamięci. Po załączeniu FRE sygnalizuje 
w przypadku C-16 - 12275, a w przypadku Plus/4 - 60669 
wolnych bajtów. W pierwszej części naszego artykułu 
przez zmianę wskaźników początku zmiennych, 
zawartość pamięci zmiennych została sprowadzona na 
ekran. Pozwaliło to zaobserwować, jak komputer układa 
w pamięci zmienne proste, w kolejności ich podawania, 
w pakietach siedmio-bajtowych. W pierwszych dwóch 
bajtach, w których umieszczona jest nazwa zmiennych, 
wyróżnia się cztery typy zmiennych. Pozostałe pięć baj- 
tów zawiera w przypadku zmiennych zmienno-przecin- 
kowych i całkowitych różnie zakodowane wartości liczb. 

Aby przenieść pamięć zmiennych na ekran, wystarczy 
Starsze bajty początku zmiennych zmienić z 16 
(16x256=4095 - początek BASIC'a) na 
12(12x256=3072 - początek ekranu). 

Można to zrobić podając rozkaz: 
POKE46,12:CLR. 


Po co jest potrzebne CLR, przecież żadna zmienna 
nie powinna być skasowana? 

Rozkaz CLR umieszcza ruchomy wskaźnik (komórki 
47/48 i 49/50) pod adresem, określonym zawartością 
komórek 45/46, a więc na początku zmiennych. Ta wła- 
ściwość jest użyta w celu zaoszczędzenia dwóch 
POKE'ów. Licznik liczy wolne bajty między wskaźni- 
kiem 49/50 i 51/52 i FREsygnalizuje 1024 bajtów więcej 
niż po załączeniu. Naturalnie nie można tego „rozsze- 
rzenia pamięci” wykorzystać. 

Ponadto nie trzeba się martwić, że ten „POKE” może 
wyrządzić szkodę komputerowi, za pomocą przycisku 
RESET można zawsze wrócić do stanu normalnego. 
Najlepiej jest teraz przełączyć się na pisownię małych 
liter, aby łatwiej można było odszyfrować kod ekranu 
i wymazać ekran przyciskiem CLR. 


Wpiszmy teraz: 
FORii=1TO+OSTEP3:ii%=ii:FORxx=OTO 100:NEXTxx,ii 


W pierwszym momencie niewiele można rozpoznać 
chociaż użyta w celu zwłoki została pętla xx. 

Na końcu w górnej linii bez odstępów umieszczone są 
trzy grupy siedmiocyfrowe. 

Zmienne zmienno-przecinkowe ii i xx rozpoczynają 
się normalnie wydrukowanymi dużymi literami II i XX, 
podczas gdy przy zmiennych całkowitych litery ii są dru- 
kowane w inwersji. 

Dlaczego tak jest, zostało obszernie omówione w pier- 
wszej części. 

Powtarzamy teraz przebieg raz jeszcze i obserwujemy 
tylko zmienną całkowitą w górnej linii. Zmienia się ona 
na tyle powoli, że można zaobserwować jak w 4 bajcie 
zmieniają się po kolei małe litery od a do i, podczas gdy 
inne bajty liczbowe pokazują niezmiennie klamry - kod 
ekranowy zero, litery a do i - kody od 1 do 9. Za pomocą 
PRINT ii% można stwierdzić, że zmienna całkowita faktycz- 
nie ma wartość 9. Jeśli „puści” się film jeszcze raz i skon- 
centruje uwagę na pierwszej grupie siedmiocyfrowej, 
dostrzeże się zmianę wszystkich 5 - liczbowych bajtów. 
Ponieważ STEP =3, więc przebiega to trzy razy szybciej 
niż przy zmiennych całkowitych. Przedstawienie liczbo- 
we w przypadku zmiennych całkowitych jest bardzo 
proste. Liczba zostaje podziełona na młodsze i starsze 
bajty. 

Młodsze bajty, jak można zobaczyć stoją na 4 pozycji 
grupy siedmiocyfrowej, starsze są zaszyfrowane na pozy- 
cji 3, leżą więc przed młodszymi. 

Po wyczyszczeniu ekranu przyciskiem CLR wpiszcie 
teraz większą liczbę: x%0=257. Na pozycji 3 i 4 pojawia 
się „a” o kodzie 1 bo 1x256+1=257 

Dła kontroli można zamienić zmienną w pamięci, np. 
pierwsze „a” na „b”, a drugie zamienić na „c”. 

Po tym x% musi przyjąć wartość 2x256+3=515. 

Można to bez większego wysiłku sprawdzić, przez 
wpisanie w jedną z wolnych linii print x%. 

Za pomocą dwóch bajtów można przedstawić 
256x256=65536 zmiennych całkowitych. Rozciąga się to 
na wartości od -32768 przez zero do +32767. 

Ujemne zmienne całkowite można rozpoznać po tym, 
że pierwszy bit starszego bajtu ma wartość 1, czyli starszy 
bajt ma wartość większą niż 127. Oznacza to w kodzie 
ekranu, że 3 pozycja jest wydrukowana w inwersji, zresz- 
tą kod ujemny liczby całkowitej wygląda zupełnie inaczej 
niż dodatniej, o tej samej sumie. Trzy ostatnie pozycje 
grupy siedmiocyfrowej służą tylko do uzupełniania. 
Można tutaj wprowadzić dowolne oznaczenie i nie 
wpływa to na wartość zmiennej. 


Wskazówka nr 7: 

użycie prostych liczb całkowitych, nie wpływa na 
zaoszczędzenie miejsca w pamięci, ani nie przynosi 
żadnych oszczędności czasowych ponieważ zostają one 
zaraz przemienione na format zmienno-przecinkowy. 


Co się stanie, gdy zostanie przekroczony dopuszczal- 
ny zakres liczb? . 
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for I=O0to3:a%=32767 +1:printa%:next 
Po przekroczeniu górnej granicy dwubajtowy licznik 
przeskakuje z powrotem do najniższej wartości i liczy 
dalej, tak samo jak licznik kiiometrów, który „skacze ”z 
99999 na O. 


( Wskazówka nr 8: 


uważaj przy obliczeniach z wysokimi liczbami cał- 
kowitymi. Po przekroczeniu wartości 32767 nie jest 
sygnalizowany błąd. Wada ta nie dotyczy zmiennych 
zmienno-przecinkowych. 


Dla przedstawienia zmiennych zmienno-przecinko- 
wych używa się 5 bajtów. W przypadku skomplikowane- 
go kodowania liczba zostaje najpierw rozdzielona na 
następną niższą od 2 potęgę i resztę zwaną mantysą. 
Komputer koduje binarnie mantysę i umieszcza na czte- 
rech ostatnich pozycjach. 

Drugi wykładnik podwyższony o znormalizowaną 
wiełkość 129 zostaje umieszczony na pozycji 3. Najłepiej 
można to pokazać na przykładzie: 

ab=5.4=1.35x22. 


Trzeci bajt powinien wynieść 2+129=131. 

W kodzie ekranu jest to małe e w inwersji (po poda- 
niu ab=5.4 faktycznie na 3 pozycji grupy siedmiocyfro- 
wej pojawia się taka literka). 

A jak to jest z liczbami niższymi od I, których wykła- 
dnik jest ujemny. 

Przykładowo a=0.5=1/2 - wykładnik równy -1. Na 
trzeciej pozycji powinno być (-1)+129=128ina ekranie 
jest to klamra w inwersji. Drugi wykładnik może przyj- 
mować wartość od -128 do +126. Komputer ma więc 
zakres liczb od 2.95*10 ? 39 do 1.7*101 38. 

Następujące prawidłowości dają się szybko dowicść. 
1. Przy drugich potęgach wszystkie cztery pozycje man- 

tysy mają wartość zero. 

2. Przy podnoszeniu dowolnej liczby do drugiej potęgi 
zmienia się tylko wykładnik na trzeciej pozycji, 

a mantysa pozostaje niezmieniona. 

Porównując dowolną liczbę z jej ujemnym odpowie- 
dnikiem a=3.456 i b=-3.456 widzi się, że jedyna różnica 
występuje w pozycji 4, w 1-szym bajcie mantysy. Tam 
umieszczony jest znak liczby. 

I znowu jest to tak, że wartości powyżej 127 oznaczają 
liczbę ujemną i na ekranie przedstawione są w inwersji. 
Nie tylko dla początkującego wydaje się to kodowanie 
skomplikowane, ałe także komputer na przekształcenie 
takich liczb potrzebuje sporo czasu. Można zmierzyć ten 
czas za pomocą wewnętrznego zegara komputera. 

Czas wskazywany przez ten zegar jest umieszczony 
w pamięci od komórki 163 do 165. 

Za pomocą rozkazu przemieścimy zegar na ekran. 

fori=O0to1000:poke3072,peek(163):poke3073,peek 
(164):poke3074,peek(165):next 

Pierwszy rozkaz POKE oznacza wpisanie do pamię- 
ci (komórka 3072 - a więc w górnym lewym rogu ekra- 
nu) zawartości 163 komórki pamięci. 

Kiedy teraz pomnożymy lewą liczbę przez 256x256, 
a środkową przez 256 i oba wyniki dodamy do prawej 
liczby, wtedy dowiemy się dokładnie ile minęło czasu od 
włączenia komputera. Pamiętajmy, że przy załączeniu 
komputera (i po każdym RESET) zegar jest zerowany! 

Naturalnie można by szybciej i wygodniej uzyskać 
wynik za pomocą instrukcji print ti. 


Wewnętrzny zegar komputera można użyć do 
pomiaru czasu wykonywania programów czy procedur. 
Trzeba wtedy np. stukrotnie powtórzyć daną procedurę 
odczytać czas realizacji i podzielić go przez sto... 


Wskazówka nr 3: 

pomiar krótkich odstępów czasowych 
10n=100:ta=ti:fori=iton 
20a=3.14159265+3.14159265 
50next:te=ti:print(te-ta)/n/.06,ms” 


W linii 10 podano liczbę przebiegów i zachowano 
czas początkowy ti. 

Między liniami 20 i 50 mogą zostać umieszczone 
dowolne rozkazy i procedury. Czas ogólny (te-to) jest 
w linii 50 dzielony przez liczbę przebiegów n, chcąc 
uzyskać czas w milisekundach, dzielimy całe wyrażenie 
przez 0,06. Aby uzyskać wynik w sekundach wystarczy 
podzielić przez je 60. 

Zanim uruchomimy ten program, komputer powi- 
nien być doprowadzony do stanu początkowego przycis- 
kiem RESET. W naszym przykładzie operacja 
obliczeniowa, której czas trwania chcemy zmierzyć znaj- 
duje się w linii 20. Dwie stałe z ośmioma miejscami po 
przecinku, powinny być dodane. Okazuje się, że C-16 
i Plus/4 potrzebuje na to 61 lub 63 ms. 

Stara reguła programowania mówi, aby kilkakrotnie 
występujące stałe zmieniać na jedną zmienną. Dlatego 
gdy linię 20 zmienimy na: 

20a=3.14159265:b=a+a 


to czas tej operacji wyniesie tyłko 35 ms. 

Zyskczasu jest znaczny! O wieleszybciej można to zrobić, 
gdy komputer ma w pamięci stałą w formie zmienno-prze- 
cinkowej. Wpiszcie: 

b=pi+pi 
- potrzeba mniej niż 4ms! 


Wskazówka nr 10: 
aby zaoszczędzić czas opracowywania, należy wystę- 
pujące wielokrotnie stałe zamienić na zmienne. 


| 
| 
| 
| 


Często w programach pisze się „a*a” zamiast a do 
potęgi 2 (a? 2) 
Czy ma to jakieś znaczenie? By o tym się przekonać 
wprowadzimy do naszego programu nową linię: 
5a=12.34. 
W linii 20 wpiszcie najpierw b=a(2 dokonajcie 
pomiaru, następnie zmieńcie: 
b=a*a. 
C-16iPlus/4 potrzebuje na a | 248,2 ms, anaa*a6,2 ms! 


Wskazówka nr 11: w*: 
zastępuj w miarę możliwiści potęgi przez mnożenie, 
, a*ajest siedem razy szybciej obliczone niż a | 2. 


Na zakończenie jeszcze jeden program - budzenie, 
który także używa zegara czasu rzeczywistego. 

Ten „jednowierszowiec” ma programowalny czas 
„budzenia” od 1 sekundy do 24 godzin. 


[ Wskazówka nr 12: 


„Budzik”. 
, itw$=„hhmmss”: ti$=„000000”: do whiie ti$ tw$: 
ioop: vol8: sound 1,800,100 
b 
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W tw$ podaje się po ilu godzinach minutach i sekun- 


dach budzik powinien zadziałać. 


Pętla „do while” biegnie tak długo, aż łańcuch ti$, 
który jest sterowany wewnętrznym zegarem, będziewię- s© 
kszy niż tw$. Potem program skacze do razkazu, który 3 


C-16 


z Klub Komputerowy STODOŁA AMIGA 
:' OFERUJE: 

najlepsze stacje dysków 3,5" 1 5,25" 

serwis sprzętu firmy Commodore 


występuje po łoop i wyzwala sygnał akustyczny. ze literatura (także 64 plus 4) 
Opracowano na podstawie RUN 23/87. ze akcesoria itp. 


Zapraszamy codziennie, oprócz sobót i niedziel 
u w godzinach od 11.00 do 20.00. 


| ZN NY EO ROP POD AAC A 
m Warszawa, ul. Batorego 10, tel. 25-60-31, wew. 35. 
OGI O SZENIA H Giełdy komputerowe w Stodole: 
= sobota od 10.00 do 15.00. 


Sprzedam rozszerzenie pamięci do 

C-128 (512kB), cena ok. 700tys. zł. 
Sprzedam FINAL III + instrukcja, 
cena 250tys. zŁ oraz 100 nagranych 
dysków do C-64. Info wyłącznie lis- 


towniec. Tomasz Pencherz, ul. 
Nałkowskiej 2, 42-600 Tarnowskie 
Góry. 


Kupię (wymienię) MAKROAS- 


SEMBLER lub ASSEMBLER z 
opisem lub instrukcją do C-64. Artur 
Karaźniewicz, 11-111 Kraszewo 33, 
woj. olsztyńskie. 


Poszukuję programów i literatyry - 
SHARP MZ-731. Bukowski, ul. 
Moniuszki 11 m 57, 11-400 Kętrzyn. 


Tanio sprzedam ATARI 65 XE + 
XCA-12 + kasety (50 programów). 
AMIGĘ kupię. Krzysztof Kaniewski, 
ul. Orkana 18/3, 10-012Olsztyn. 


C-64: wymienię kasety. Artur Czaj- 
kowski, ul. Wyki7/10, 01-318 
Warszawa. 


Sprzedam C-64 II + stację VC-1541 II 
+ monitor + magnetofon + final III + 
top star (5młn). Ciszewski Dariusz, ul. 
ZWM 40 m 34, 42-200 Częstochowa. 


YAKUZA'S PLAYERS CLUB - C-64 
zaprasza. OŚ. Dywizjonu 303, bl. 44/53, 
31-875 Kraków. 


E8 
4 4: OŚ 
ER Bydgoszcz M<PDz< 
RET ko ów | ul.Rumińskiego 6 || > N BA 
COMMODORE C-64 od 1.290 tys.- 1.490 tys.$ NĄ (budynek NOT) zozER 
AMIGA 500 (angielska) od 4.550 tys.— 4.890 tys. ZOE 
Monitor od 1.290 tys.— 1.460 tys. tel. 22—40-84 > R Ozs 
Stacja dysków od 1.690 tys.- 1.890 tys. zań wew.42 | - Za 
JOYSTICK od  45tys-  S5tys. M tel/fax 71-65—65 z > = 
= © 


Telewizory SONY, Philips, Blaupunkt, Toshiba, Samsung i inny sprzęt audio-video. 


„PRÓFIT” 
PROGRAMY NA AMIGĘ 


Bogaty wybór, gwarantowana jakość, konkurencyjne ceny 
(najniższe w kraju), błyskawiczne terminy. 
Katalog + opłata jego przesyłki GRATIS!!! 


Nasz adres: PROFIT, box 170, 14-100 Ostróda. 


edsiębiorstwo "FORMAT" 


00-502 Warszawa, UL Bracka 4  piuro czynne: 
Tel. 296047,-48 w. 25 _ 10.00 - 16.00 


ZEWNĘTRZNE ST ACJE DYSKÓW 


ATARI ca + AMIGA + AMSTRAD 


TOSHIBA, BONDWELI, SPECTRAVIDRO, XT/AT. PRZENOŚNE 


< DYSKI TWARDE 


DRUKARKI 


Star 


(Ser 


DOWOLNA KONFIGURACJA! ś Dv. Centralnego 
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C-64 


i to chyba najtańszy z programów emitujących 

mowę. Można go wykorzystać na wiele sposobów, np. 

w grach, czy w menu (spisie). Zapewne zdziwił Was reali- 

stycznie brzmiący dźwięk w niektórych grach komputero- 

wych. Za pomocą tutaj przedstawionego programu 

i z wykorzystaniem przetwornika analogowo - cyfrowego, 
można bezpośrednio wydobyć głos i dowolne dźwięki. 

Przetwornik analogowo - cyfrowy jest to urządzenie 
przekształcające informacje z mikrofonu, radia i mag- 
netofonu na kod cyfrowy zrozumiały przez komputer. 
Różnica między sygnałem analogowym i cyfrowym Sia- 
nie się jasna, gdy porówna się zegar wskazówkowy z cyf- 
rowym. 

Zegar ze wskazówkami, które obracają się powoli, ale 
ciągle, przedstawia sygnał anałogowy. Im cieńsza jest 
wskazówka i silniejsze szkiełko powiększające, tym do- 
kładniej możesz odczytać czas. 

W przypadku zegara cyfrowego, użycie szkiełka 
powiększającego nie zda się na nic, ponieważ oznaczenie 


kazów jest przedstawiona jako >X< i może przyjmo- 

wać następujące wartości: 

X=1i do 16. Zakres od 1 do 16 jest zarezerwowany dla 
słów jedno, względnie dwusylabowych. 
Można tutaj zapamiętać np. liczby lub 
krótkie wyrazy. 


X=17. Zakres dla zapisu słów kilku sekundowych. 
Można wpisać krótkie zdania. 
X=255. Jeśli liczba 255 zostanie zapisana za rozkazem, 


to rozkaz pokrywa zakres od 1 do 17. 

Zostanie więc zapisana cała pamięć. 

Możemy przetworzyć około 13 sekund. 
Wszystkie inne liczby będą interpretowane jako 17. 


TERAZ ROZKAZY: 

Łx >lcarn< - po wprowadzeniu tego rozkazu ekran 
zostaje wygaszony. Sygnały dźwiękowe zostaną prze- 
kształcone w postać cyfrową i zapamiętane. > X< decy- 
duje, w którym obszarze pamięci będą umieszczone. 


SX >say< - po tym rozkazie 


czasu nie zmienia się ciągle _- 
lecz w skokach np. sekun- 
dowych. Będziecie teraz na 
pewno oponować, że dla 
przekształcenia dźwięku 
w postać cyfrową, koniecz- 
ne jest spore oprzyrządowa- 
nie dodatkowe. Tak jednak 
nie jest, ponieważ każdy 
magnetofon posiada elekt- 
ronikę, konieczną do prze- 
kształcenia sygnału 


HURA! 
ON MÓWI! 


ekran zostanie także wygaszo- 
ny. Z. głośnika telewizora lub 
monitora rozłegnie się teraz, 
to co wcześniej nagrałeś. 
W przciwieństwie do rozkazu 
>learn< ten rozkaz nie 
wymaga dodatkowego oprzy- 
rządowania. Może więc być 
użyty bez dałej opisanej prze- 
róbki. >X< decyduje z jakie- 
go obszaru pamięci będą 
podawane dźwięki. 


w postać cyfrową. Potrze- ——— 

bujesz więc jedynie C-64 i magnetofon. Lutowanie 
ogranicza się wyłącznie do przylutowania mikrofonu, lub 
gniazda mikrofonowego do złącza w magnetofonie. 


DODATKOWE ROZSZERZENIE BASICU. 

Zanim zabierzesz się do rozebrania magnetofonu, 
trzeba najpierw wprowadzić program „MOWA” (listing 
1) i nagrać go na taśmie. Program ładujcmy za pomocą 
LOAD "MOWA", 8,1. Po starcie SYS 49231 zmieniają 
się barwy obrazu i zmodyfikowany sygnał zgłoszenia 
pojawia się na ekranie. Teraz mamy do dyspozycji 5 
nowych rozkazów w Basic'u i tyłko 2045 bajty wolnego 
RAM"u. Powodem tego, że do dyspozycji zostało tylko 
2045 bajtów jest to, że zapis cyfrowy mowy wymaga dużej 
ilości pamięci. Dła zapamiętania 13 sekund mowy 
konieczne jest około 38000 bajtów. 

Aby mowa została zapisana w możliwie najwyższej 
jakości, ekran jest wygaszony podczas procesu przetwa- 
rzania i odtwarzania dźwięku, przerwanie przez wideo- 
kontroler tego procesu mogłoby mieć negatywny wpływ 
na jakość dźwięku. W celu uzyskania, jak największej 
elastyczności po zainstalowaniu programu, pamięć C-64 
została podzielona na różne obszary, w których mogą 
być zapamiętywane słowa łub dźwięki. Pojedyńcze prze- 
działy można w programie dowolnie często przywoływać 
i uszeregowywać. 


5 DODATKOWYCH ROZKAZÓW W BASIC'U 


Cyfra postawiona za rozkazem, decyduje, którego 
przedziału RAM'u rozkaz dotyczy. Liczba w opisie roz- 
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P „nazwa” X >put< za pomocą tego rozkazu można 
sekwencję dźwięków, które znajdują się w pamięci prze- 
grać na dyskietkę. (13 sekundowy zapis zajmuje 178 
bloków), > X < mówi, który zakres będzie zapamiętany. 


G nazwa >get< ten rozkaz będzie używany do ładowa- 
nia sekwencji dźwięków. 


R >rate< za pomocą tego rozkazu można wpłynąć na 
szybkość odtwarzania. Po rozkazie musi nastąpić wyra- 
żenie numeryczne (liczba) określające szybkość. Do- 
zwolone są liczby od O do 19. Przy czym 0 odpowiada 
najniższej, a 19 najwyższej prędkości (13 odpowiada 
normalnej prędkości mowy). 


PRZERÓBKA IHARDWAR'u 


Jak wyżej wspomniano, do przekształcenia sygnału 
w postać cyfrową będzie użyty magnetofon. Aby doko- 
nać odpowiedniej przeróbki trzeba go otworzyć. W tym 
celu należy wykręcić 4 śruby z dołu. Po zdjęciu pokrywy 
ukaże się płytka ekranująca z folii ałuminiowej. Z pod 
folii wystaje na zewnątrz złącze (rys.1). Przylutuj do 
iego złącza w oznaczonych punktach mikrofon lub 
odpowiednie gniazdo. To już cała przeróbka! Jeśli 
chcesz znowu magnetofon używać jako pamięć maso- 
wą, to należy mikrofon odłączyć, aby zapobiec zakłóce- 
niom podczas transmisji danych między C-64 
i magnetofonem. Miejcie na uwadze, że po otwarciu 
magnetofonu tracicie gwarancję. Jeśli nie macie do- 
świadczenia w lutowaniu, namawiamy Was, aby prze- 
róbkę wykonać pod okiem fachowca. 
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c168 : Od dc 78 a9 0085 faa5 9a 
c170 : fb 85 fb a0 00 a2 08 ad di 
c178 : Od dc 4a 4a 4a 4a 85fe da 
PŁ c180 : OGff a5ff 05 fe 85ff 4d 
ROWIONU | 188 : cad0Oec91fa86ff88 _ 1c 

c190 : d0 e3 e6 fb a5 fb c5 fc d6 
c198 : dO d9 ad 11 dO 09 10 8d 93 
cia0 : 11d058a9818dO0ddc  d7 
cia8 : 28 4C e7 a7 ea eOfffO 7d 
cibO : 09 a99f85fb a9 cO 85 41 
c1b8 : fc 60 a9 10 85 fb a9 cO bi 
cic0O : 85 fc 60 8a 69 Of 8d Od 8c 
cic8 : c2 28 4c e7 a7 00 00 00 29 
cid0 : 00 00 00 00 QQ 00 00 00 di 
cid8 : 00.00 00 00 00 a9 36 85 0a 
Listing 1 Program „MOWA”. cie0 : 01a97f8dOddc78ad  3c 
cie8 : 11 d029ef8d 11 dO ea 24 


TU PODŁĄCZYĆ 
MIKROFON 


Rys.1 - tak podłącza się zwykły mikrofon do magne- 
tofonu. 


c000 : 93 90 20 20 20 20 20 20 ab cifO : a9 00 85 bb a5 fb 85 bc 3C 
c008 : 2a 2a 2a 20 56 4f 49 43 62 cif8 : a000a208b1ibb0a48  f4 

c010 : 4520 36 34 20 53 59 53 22 c200 : 90 Oa a9 Of 8d 18 d4 a9 22 
c018 : 54 45 4d 20 56 32 2e 30 76 c208 : 008d 18d44c 1cczea f6 

c0O20 : 202a2a2a0d0d3139 96 c210 : eaceaeaeaeaeaeaea of 

c028 : 3835 20 42 59 20 4d 2e 73 c218 : eaeaeacaeaeaeaea 17 
c030 : 4b 4c 49 4e 47 45 52 20 e6 c220 : eaea68cad0d888d0 8a 
c038 : 20 32 30 34 35 20 42 41 e4 c228 : di e6 bc a5 bc c5 fc dO e0 
c040 : 53 49 43 20 42 59 54 45 d8 c230 : czad 11 d0 09 108d 11 96 
c048 : 53 20 46 52 45 45 00 a9 59 c238 : d0 58 a9 37 8501 ea 4c 2a 
c050 : 00a0 c0 20 te ab a9 Of d8 c240 : a3c1 a9 66 8d 08 03 a9 73 
c058 : 8d21 dO0a90b8d20d0 ie c248 : cO 8d 09 03 a9 1085 34 Ob 
c060 : 4c 42 c2 00 00 00 20 73 e5 c250 : 8538 20 44 a6 4C 74 a4 6a 
c068 : 00 08 c9 5f fO 04 28 4c 33 c258 : 00 45 00 fb OO fb 00 fb 52 


Cc070 : e7 a7 28 20 73 00 08 c9 24 

c078 : 4cf0 24 c9 53 fO 2b ea be UWAGA! Ostatnia, oddzielona kolumna liczb jest 
c080 : 4c3ac1ea209bb708 85 sumą kontrolną danego wiersza. 

c088 : e0119004ea4cadci e1 

Cc090 : ea a9 06 69 09 ca dO fb 20 Opr. H.S. 
c098 : 85 fb 69 09 85 fc 60 28 a8 
c0a0 : 209bb7082088c04c  S5f 
c0a8 : 5dc128209bb70820 cc 
cObO : 88 c04c dd c1 28 20 13 6b 
cob8 : cieaeaeaeaecaeaea 8e 
c0cO : a2 08 a001 20 baff a2 cc 


cOc8 : 3c a0 03 a5ff20 bdff cz Księgarnia ELEKTRONIKA 
cOd0 : a900 a2 00 a0 00 20 d5 58 ME 

COd8 : ffea4c e4 a7 20 13c1 47 R. Wójcik i S-ka 

c0e0 : 28 20 9b b7 08 20 88 cO 1b 00-542 WARSZAWA ul. Mokotowska 51/53 


c0e8 : a9368501a20820ba  8e tel./fax (022) 628-16-14 
cOfO : ffa2 3c a0 03 a5ff 20 01 
cofa : bdff a2 00 a4 fb 86 fd 9e 
c100 : 84fe a9 fd a2 01 a4fc ec 
c108 : 20 da ffa937 8501 28 bd 
c110 : 4ce7 a7 20 73 00 c9 22 e0 
c118 : f0 03 4c 08 af ea a0 00 73 
c120 : 20 73 00 c9 22 f0 Ob 99 3C 
c128 : 3c 03 c8 cO 10f0034c 5d 


POLECA W CIĄGŁEJ SPRZEDAŻY 
CZASOPISMA A 


64 plus 4 £ AMIGA (również numery zaległe) 
PUBLIC DOMAIN PACK C-64 i AMIGA 
VOICETRACKER V4.0 


c130 : 20c1 ea 84ff 60 00 00 7f AMIGA COMPUTING 

c138 : 0000 c9 47 fO Oc c9 50 cb AMIGA ACTION 

c140 : fO 9h c9 52 fO 07 28 4c 3b 

c148 : 08 af 4c b5 cO 28 20 9b f7 PROWADZIMY SPRZEDAŻ 


c150 : b7 08 e0 14 90 03 4c 48 a9 
c158 : b24cc3cieaad11id0  5b 
c160 : 29ef8d 11 dO a9 7f 8d 7a 


ZA ZALICZENIEM POCZTOWYM! 
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- JAK ZROBIĆ DEMO (8) 


Po lekturze poprzedniego odcinka naszego cyklu może- _ serlset LDA 4$17 
my chyba uznać problem wykonania prostego jednoznako- STA upbyte 
wego scroll'a za zamknięty. Nieco inaczej ma się sprawa LDA 4801 


z płynnym przesuwaniem tekstów o innym formacie czcio- m a” WARS da 
nek, a już na pewno czymś nowym będzie wykonanie prze- 3 * Eemikó AŻ Y 
suwania tekstu do góry, czyli taka techn ika, którą najczęściej STA 520 : 
możemy zaobserwować na zakończeniu każdego filmu, LDA  ś4>nd 
gdzie wyświetlane są w ten sposób nazwiska aktorów, reży- STA $21 
sera, itp. RTS 
Zasada płynnego przesuwu pozostaje taka sama, tzn. 
o wysokość znaku przesunięcie dokonuje się drogą scroll LDA 4800 ;wartosc licznika 
sprzętową (komórka $D011), po czym następuje prze- BEQ ser 
sunięcie całego ekranu w górę o jeden wiersz, druk na- s PALCE 
stępnej linii i cały cykl wykonywany jest od początku. LDA 4801 
Główna różnica połega na tym, że nowa linia pojawia SIĘ STA saelik4 zaladówanie. dicztiika 
jako 40 kolejnych znaków, co odpowiada szerokości LDA upbyte ;obsluga scrol'a w gore 
ekranu. SEC 
Dla osób wprawionych w śłedzeniu zamieszczanych SBC  4$01 
w tym dziale listingów nie będzie problemem wychwycc- CMP  4$10 
nie wszystkich niuansów. BCS scr2 
Tekst programu jak zwykle napisano przy użyciu Tur- LDA | 4817 
bo Asscmblera. zee SR. UPRA 
STA $D011 
*= $1000 „adres startu assemblacji - Mia 
LDA _ 4$01 , pe: = | > afk 
STA $0286 „ustalanie atrybutow koloru a Za iPZS leon 
"tla „wiersz w gore 
STA _ $DO21 AA asa: 
JSR $E544 ;kasowanie ekranu sor5 A ($20),Y 
SEI STA $07C0,Y 
LDA KSTF ka scr4 ;zero? TAK-koniec tekstu 
STA $DCOD „ustawianie IRQ- 
ę ( CPY 4$28 
„graficznego BCC 5 
LDX 4800 ko 
BCS scr6 
ak ac 4 JSR txtset ;tekst od tk 
STX $DO20 scr: AE w x ,„IeKST O poczalku 
STX _ $DO21 > 
INX scr6 TAY 
CLC 
STX DOTA 
LDA . B e - 
STA _ $DO11 $ 
BCC ser7 
LDA 4$F9 INC s21 
STA $D012 „przerwanie w linii $F9 7 RTS 
ŁLDA  śq sh 
sek ae takeup LDX 4$27 „szybki scroll w gore 
SIE Maka tp1 LDA $0428,X 
STY $0315 zmiana wektora IRQ p ' 
JSR serlset „ustawienie parametrow LIE a: 
Gl ć LDA _ $0450,X 
- A STA $0428,X 
loop JMP loop ,petła (do wykorzystania) LDA $0478,X 
; STA $0450,X 
sh, LE EA LDA _ $04A0,X 
JMP $EA7E :zakonczenie IRQ > 2. 
upbyte „BYTE  $00 bajt do zapisu wartosci STA $O4AO,X 


PPR LDA _ $04FOX 


STA $04C8,X 


C-64 


LDA $0518,X 
STA $04F0,X 
DEX 
BPL tp1 
LDX +$27 
tp2 LDA $0540,X 
STA $0518,X 
LDA $0568,X 
STA $0540,X 
LDA $0590,X 
STA $0568,X 
LDA $05B8,X 
STA $0590,X 
LDA $05E0,X 
STA $05B8,X 
LDA $0608,X 
STA $05SE0,X 
DEX 
BPL tp2 
LDX H$27 
tp3 LDA $0630,X 
STA $0608,X 
LDA $0658,X 
STA $0630,X 
LDA $0680,X 
STA $0658,X 
LDA $06A8,X 
STA $0680,X 
LDA $06D0,X 
STA $06A8,X 
LDA $06F8,X 
STA $06D0,X 
DEX 
BPL tp3 
LDX +$27 
tp4 LDA $0720,X 
STA $06F8,X 
LDA $0748,X 
STA $0720,X 
LDA $0770,X 
STA $0748,X 
LDA $0798,X 
STA $0770,X 
LDA $07C0,X 
STA $0798,X 
DEX 
BPL tp4 
RTS 
txt = $A200 „przykładowy adres tekstu 


Wnikliwi obserwatorzy zapewne zauważyli, że proce- 
dura o nazwie „TAKEUP” została napisana w nieco „dłu- 
gi” sposób. Forma ta nie grzeszy krótkością, ale za to 
jest jedną z niewątpliwie najszybszych (a juź na pewno 
jestszybsza niż np. podobna, napisana z wykorzystaniem 
adresowania przez stronę zerową pamięci) co ma zna- 
czenie w przypadku, gdy zechcemy ją wykorzystać razem 
z innymi procedurami. 

W naszym przykładzie adres tekstu ustaliliśmy na 
$A20O tylko po to, by można byłoszybko iwygodniespraw- 
dzić, czy całość sprawnie pracuje (w tym miejscu pamięci 
znajdują się w ROM teksty komunikatów j. BASIC). W 
konkretnym zastosowaniu wykorzystaniu tekst należy 
umieścić w pamięci w postaci kodów ekranowych, przy 
czym kod zero jest znacznikiem końca tekstu. Właściwy 
adres startu należy w takim przypadku umieścić, modyfi- 
kując adresy w proccdurze o nazwie „TXTSET”. 


Paweł  Sołtysiński 


Witajcie! 


Tym razem programów do naszej zwariowanej rubryki 
przyszło tyle, że na biurku utworzył mi się pokaźny stosik 
listów. Ze wszystkich wybrałem dwa, które przedstawiam 
poniżej. 


Pewcł Tutka z Gliwic przysłał do nas programik 
sprawdzający stan bitów w bajcie. 


PRINT „PODAJ LICZBE”;: INPUT A: PRINT 
PRINT „PODAJ ILOSC BAJTOW";: INPUT B 
B=B*8-1 

FOR Q=B TO 0 STEP -1:Z(Q)=0 


IF A=27Q THEN A=A-27Q: Z(Q)=1 

NEXT Q 

PRINT 

FOR Q=B TO O STEP -1: PRINT Z(Q);: NEXT Q 


Teraz czekam na programik zapalający dowolny bit 
w bajcie! 

Jacek Zaczko ze Szczecina przysłał dwa programy do 
naszej rubryki. Do druku wybrałem „Płynne przesuwa- 
nie napisów”. 

Oto sam program: 


10 DIM G$ (14):ILOSC WYRAZOW 

15 FOR W=0 TO 19: READ G$(W) 

20 PRINT  CHR$(147) 

25 FOR A=39 TO O STEP -1 

30 PRINT TAB(A) "";G$(W);PRINT CHR$(147) 


35 NEXT A 

40 NEXT W 

100 DATA COMMODORE,64, + ,4,AMIGA, 
PRZEDSTAWIA 

110 DATA PROGRAM, DEMONSTRACYJNY, 
PRZESUWANIE 

120 DATA TEKSTOW,AUTOR.: JACEK, ZACZKO 


Jest to jedno z możliwych rozwiązań. Program prze- 
suwa jednak całe wyrazy a nie poszczególne litery. Jest 
to wada tej koncepcji. 

Czekam na inne pomysły realizacji tej procedury. 
Najciekawsze wydrukujemy. 


Sambor Kuźma 
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Chcąc zrobić niespodziankę wszystkim tym, którzy lubią 
przepisywanie programów z magazynów komputerowych, 
postanowiłem napisać coś, co mimo tego, że bardzo krót- 
kie, będzie już godne nazwy gry. 


Jeżeli chodzi o stronę konstrukcyjną programu, to 
zasadniczo składa się on z dwóch części: 


e programu w języku BASIC 
e procedur w kodzie maszynowym, 


Zasady są bardzo proste: joystick'iem podłączonym 
w porcie numer 2 sterujemy nasz?m pojazdem, którym 
musimy bezkolizyjnie przejechać po krętych górskich 
drogach. Biorąc pod uwagę fakt, że aktualnie zjeżdżamy 
z góry, należy uznać za normalne, że prędkość ulega 
zwiększeniu z każdą chwilą. Kto będzie w stanie dłużej 
prowadzić swój pojazd, ten uzyska więcej punktów, przy 
czym najlepszy dotychczasowy wynik jest automatycznie 
zapamiętywany, jako tzw. HIGH - SCORE. 


dzięki którym cała animacja odbywa się naprawdę 
szybko. Także sterowanie naszym pojazdem odbywa się 
z poziomu języka maszynowego. Teraz wystarczy już tyl- 
ko dokładnie przepisać zamieszczony poniżej listing 
i rozpocząć grę. Przy okazjichciałbym nadmienić, że mój 
własny rekord wynosi 92 punkty! 


Paweł „POLONUS”  Sołtysiński 


REM**(C)Pawel _ Soltysinski** 
REM**C-64V.(C-64+4 6 AMIGA)** 


:GOSUB 100 


POKE53280,0:POKE53281,0:0=20649:PRINTCHRS$(5):CHR$(147):CHR$(14);CHRS$(8); 
PRINT'"SCORE:0*;TAB(14);"LEVEL:1" 

PRINTTAB(26);"MOUNTAINRAID":L=1 

PRINTTAB(26);"BYPOLONUS" 

PRINT:PRINTTAB(26);"HISCR:;HS 

FORT=1TO25:SYS20480:NEXT:X=0:8C=0 

IFPEEK(1584+X) =32THENPOKE832,X+-2:POKE830,X+2:GOTO33 
X=X+1:GOTO31 
SYS20666:PRINTCHRS(19);:FORT=1TO23:PRINT:NEXT:A$=CHR$(19):EP=833 
PRINTTAB(6);CHR$(18);"PRESSFIRE" 

IFPEEK(56320)AND18GOTO35 
LV=(10-L)*10:PRINTA$;TAB(20);STR$(L):CYT=50 
PRINTA$;TAB(6);INT(SC):SC=SC+.1:SYSC:FORT=OTOLV:NEXT 
CYT=CYT-1:IF CYT=0 AND L<10 THEN L=L+1:GOTO40 

IF PEEK(EP)=O THEN 50 
PRINTA$:FORT=1TO6:PRINT:NEXT:PRINTTAB(6);CHR$(18);-————* 
PRINTTAB(6);CHR$(18);-GAMEOVERI-":PRINTTAB(6);CHRS$(18);-—-—- zk 
FORT=1TO255:POKE53280,T:NEXT:SC=INT(SC):IFSC>HSTHENHS=SC 
GOTO10 


REM ** KOD MASZYNOWY: ** 
100 FOR T=20480 TO 20728:READ C:POKE T,C:NEXT:RETURN 
110 DATA _169,152,133,251,133,32,189,192,133,253,133,34,169,7,133,33,133 
120 DATA _35,169,219,133,254,133,252,162,23,160,24,177,32,145,34,177 
130 DATA _ 251,145,253,136,16,245,165,32,56,233,40,133,32,133,251,176,4 
140 DATA _198,33,198,252,165,34,56,233,40,133,34,133,253,178,4,198,35 
150 DATA _ 198,254,202,208,210,173,19,208,45,18,208,77,2,222,41,3,240 
160 DATA _8,201,3,240,4,201,1,176,6,206,63,3,76,102,30,238,63 
170 DATA  3,173,63,3,201,2,176,5,169,2,141,83,3,201,17,144,5 
180 DATA  169,17,141,63,3,162,24,169,95,157,40,4,169,11,157,40,218 
190 DATA _202,16,243,174,63,3,189,1,157,40,216,232,160,5,169,32,157 
200 DATA  40,4,169,1,157,40,216,232,136,208,242,169,1,157,40,218,96 
210 DATA  174,62,3,169,32,157,48,6,173,64,3,141,62,3,32,0,80 
220 DATA  174,64,3,169,31,141,24,212,189,48,6,56,233,32,141,65,3 
230 DATA _ 169,30,157,48,6,169,0,141,24,212,173,0,220,141,255,3,41 
240 DATA  4,208,8,173,64,3,240,3,206,64,3,173,255,3,41,8,208 
250 DATA _ 10,173,64,3,201,24,176,3,238,64,3,96 
READY 
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Po przerwie, w czasie której mam nadzieję nie próżno- 
waliście tylko sami próbowaliście poznawać kolejne roz- 
kazy mikroprocesora, zabieramy się do dalszej pracy. Dziś 
poznamy rozkazy pozwalające na operację na bitach i tzw. 
przesunięcia. 


AND - iloczyn logiczny „i” 


AND ś4$nn 


AND $nn,X 


AND $nnnn 
AND $nnnn,X 


Cóż to jest ten iloczyn logiczny? Jest to operacja na 
bitach w dwu bajtach. Jeśli oba bity są zapalone to 
w wyniku otrzymujemy 1. W każdym innym przypadku 
wynikiem jest 0. AND po angielsku znaczy i, łatwo jest 
więc zapamiętać tę operację np. tak: „jeśli I jeden I drugi 
bit jest równy 1 to wynik jest też równy 1”. Wyobraźmy 
sobie następujący układ bitów i przeprowadźmy na nim 
operację AND: 


10100110 = $A6 
AND 01100011 = $63 
00100010 = _ $22 


Wystarczy sprawdzić teraz na komputerze: 


1000 LDA £$A6 
1002 AND +4$63 
1004 BRK 


; ładowanie do akumulatora A6 
; iloczyn logiczny z wartością 63 
; koniec 


W wyniku, w akumulatorze, otrzymujemy spodziewa- 
ną wartość 22. Zgadza się? 


ORA (or with accumulator) - suma logiczna „„lub” 


| E 
| ORA $nn,X 


ORA $nnnn 
ORA $nnnn,X 
ORA $nnnn,Y 


ORA również operuje na bitach tyle, że aby otrzymać 
„jedynkę” wystarczy aby jeden z nich był „jedynką”. 
Najlepiej zilustruje to przykład: 


10100110 = $A6 
ORA 01100011 = $63 
11100111 = $E7 


1000 LDA 4$A6 
1002 ORA 4$63 


1004 BRK - w wyniku AC=$E7 


EOR (exlusive - OR) - suma modulo dwa 


Aby zrozumieć, jak działa EOR najlepszy będzie 
kolejny przykład: 


10100110 = — $A6 
01100011 = $63 
11000101 = $C5 

1000 LDA 4$A6 

1002 EOR 4:$63 

1004 BRK - AC=$C5 


Z tego przykładu widać, że jeśli bity są „różnowartoś- 
ciowe” to w wyniku otrzymujemy „jedynkę”. W innym 
przypadku wynikiem zawsze będzie „zero”. 
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ASL (arithmetic shift left) - przesunięcie w lewo 


RK"R 


ASL $nn 
ASŚL $nn,X 
ASL $nnnn 
ASŚL $nnnn,X 


Rozkaz ten powoduje przesunięcie bitów o jeden 
w lewo. Do przesuwanego bajtu „wpada” 0 natomiast 
wysuwany bit znajduje się w C. Oto przykład: 


10100110 = $A6 
po ASL 

01001100 = $4Ci'C'=1 
Wykonajmy: 


1000 LDA 4$A6 
1002 ASL 
1003 BRK 


W wyniku otrzymujemy w akumulatorze wartość 4C 
i dodatkowo carry=l. 


LSR (logical shift right) - przesunięcie w prawo 


C""HH 


LSR $nn 
LSR $nn,X 
LSR $nnnn 


LSR $nnnn,X 


Rozkaz działa podobnie jak poprzedni tyle, że bity są 
przesuwane w prawo. 


Sambor Kużma 


CZY 128D = 128D? 
CZYTAJ 
W NASTĘPNYM 
NUMERZE! 


GRAJ ABY 
WYGRAĆ 


Po wgraniu gry zresetuj komputer i wpisz następują- 
ce komendy: 
Poke 12865,173:Poke12957,173 - nieśmiertelność 
Poke 12700,9€ - odporność na zderzenia 
Sys 32768 - ponowny start gry 


***MENACE*** 
Początek jak poprzednio. 
Poke 8980,234:Poke 8981,234 - energia 
Poke 8228,0 - pociski do działa 
Poke 8243,0:Poke 8261,0 - Energia do laserów 
Sys 2080 - restart gry 


***THUNDERBLADE*** 


Początek jak poprzednio. 
Poke 4159,255 - 255 helikopterów 
Sys 4096 - restart gry. 


***EMPIRE STRIKE BACK*** 


By uzyskać nieskończoną ilość energii w czasie gry 
wciśnij spację oraz B,N,M.J,K,L. 
Robert "Mr.Raf" Turliński 
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Prosimy o CZYTELNE wypełnienie. 


Prosimy o CZYTELNE wypełnienie. 


STATEX 
PRACOWNIA KOMPUTEROWA 


01-911 Warszawa, ul. Andersena 2 


oferuje 


PEŁNY SERWIS SPRZĘTU 
COMMODORE 64 / AMIGA, 
PC - XT/JAT, 


stacje dysków, drukarki, cartridge. 


W związku ze znacznym wzrostem opłat za przesyłki pocz- 
towe, mając na uwadze dobro naszych czytelników sugerujemy 
zamawianie numerów zaległych naszego czasopisma na nieco 
Innych zasadach. 

Koszty przesyłki za tzw. zaliczeniu pocztowym przedstawia 
tabela (rubryki 2, 3, i 4). Wynika z niej, że koszty przesłania dwóch 
pierwszych numerów „64 plus 4” są większe niż ich wartość! 
Zamawiając numery wartości 6.000 zł zmuszeni jesteście dopłacić 
poczcie jeszcze 8.000 zł! 

Zupełnie inaczej przedstawia się sytuacja w tabelach 5, 6 i 7. 
Wpłata kwoty z rubryki nr 7 na nasze konto (wraz z czytelną 
adnotacją, których numerów dotyczy, umieszczoną na wszystkich od- 
cinkach blankietu) powoduje, że otrzymujecie przesyłkę bez kosztów 
pobrania! 

Proponujemy abyście zaległe numery naszego pisma zamawiali 
w sposób następujący: wykorzystując tabelę - rubryki 1, 2, 5i 7 - 
wyliczyli kwotę wpłaty, a następnie przesłali ją na nasze konto. Po 
otrzymaniu wpłaty natychmiast realizujemy przesyłkę! 

Uwaga: dla dokonania wpłaty prosimy wykorzystać blankiet 
zamieszczony na tej stronie. Wszystkie dane prosimy pisać czytel- 
nie i - zgodnie z rubrykami na blankiecie - dziękujemy! 


FACH 
D isme: 

ZETA 
kz 


PRES 21.000,- 


jem 
RAR 
+LViii 


8O 288 GDANSK MORENA 
MIKRO ul Marusarzówny Ó 


NY SERWIS tei 48 50-63 900-700 


Oferujemy do komputera AMIGA 500 


ROZSZERZENIE RAMI 
do 1 MB 
do 2.3 MB 
do 2.5 MB 


Wszystkie rozszerzenia mogą być wyposażone w zegar 
z podtrzymaniem akumulatorowym. 
Prowadzimy też naprawy sprzętu komputerowego i peryterii. 
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Często posiadamy wiele różnych procedur, które wyko- 
rzystujemy w swoich programach, a które to procedury są 
uniwersalne dła wielu z nich, np. FileRequester'y, depac- 
kery i decruncher y, różne standardowe okienka i wiele, 
wiele innych. Aby nie wydłużać naszych programów przez 
włączanie tych samych procedur do nich powinniśmy sobie 
utworzyć własną bibliotekę! Jak to zrobić? 

Otóż nic prostszego: potrzebujemy tylko podstawową 
wiedzę o programowaniu na Amidze, jakiś asembler 
(GenAm, ArgAsm, AsmOne czy choćby stara wysłużo- 


; dane o naszej bibliotece 


Version = 1 
Revision = 0 
Pri = 0 


--STRUKTURA BAZY NASZEJ  BIBLIOTEKI--- 


; Moze byc dowolnie modyfikowana jednak musza 
w niej wystepowac te zmienne 


na Seka), oraz ten artykuł, a także bardzo dużo pomys- ul_SegList = _ $22 
łów na procedury. ul_Flags =  $26 
i PORA ważący: " ul_Pad = $27 
Najlepszą metodą na napisanie własnej biblioteki jest ul SIZEOF = $28 
wnikliwa analiza przedstawionego poniżej programu 
źródłowego, który stanowi przykładową bibliotekę | Start: 
z jedną procedurą - ChangeLED (adres -$le od bazy moveq  $0,d0 ;tutaj zaczyna się nasza 
biblioteki), włączającą lub wyłączającą filtry. :biblioteka 
Wielu własnych bibliotek i aby stały się one standar- rts 
dami tak jak arp, req, czy powerpacker, życzy autor | Resident: 
artykułu. dcw _ $4afc ;RTC_MATCHWORD 
dc.l Resident 
ak sk sk sk sk sk sk dk kk sk kk s sk kk sk zk Sk s sk zk sk sk dc.l CodeEnd 
* Project: _ user.library ka dc.b $80 i 
w Coded: Marcin „Duddie” Dudar * dc.b Version 
* Version: * de.b $09 
* v1.0 1991, 2 Nov * se AP 
ak sk sk sk sk sk kk sk sk sk sk sk sk sk dk zk sk zk sk sk ak sk sk zk kk kkk dc. LibName 
Exec = 4 dc. IDString 
dc.l Init 
,exec.library 
LibName: 
FreeMem: =  -210 dc.b 'user.library,O0 ; nazwa biblioteki 
Remove: =  -252 IDString: 
LIBF SUMMING i dc.b 'user.library v1.0 (2 Nov, 1991)',13,10,0 
= u dc.b _ '(0)1991 in „Duddie” Dudar,0 
LIBF CHANGED : % c (0C)1991 Marcin uddie udar 
LIBF_SUMUSED = 4 
LIBF_DELEXP = 8 So: 
LIBB_SUMMING = 0 ;tablica  inicjujaca 
LIBB CHANGED = 1 Init: 
LIBB_SUMUSED = 2 dc.l ul_SIZEOF 
LIBB_DELEXP = 8 dc.l FuncTable 
LIB FLAGS g dc.l DataTable 
= $e ; ; 
= dc.l tPR 
LIB_PAD = gf c InitRoutine 
LIB _NEGSIZE = $10 
LIB POSSIZE - sie —-TABLICA ADRESOW  PROCEDUR— 
LIB_VERSION = $14 FuncTabie: 
LIB_REVISION = $16 PmeJĘR A 
LIB_IDSTRING = $18 dc.l ul_ Open 
LIB SUM = $ie dc.| ul_Close 
LIB_OPENCNT =  $20 dc.l ul Expunge 
LIB_SIZE =  $22 dc.l ul_Nuill ;tych czterech adresow 
„procedur nie mozna 
UNĄGNE ua” „zmieniac ani zamieniac 
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„miejscami (grozi to blednym addq.w?/ 1,LIB_OPENCNT (a6) „procedura 
„dzialaniem _ biblioteki) iwywolywana za 
dc.l ChangeLED AE. wik 
; tutaj adresy naszych procedur BEGG Ro 
dc.l 1 belr 4LIBB_DELEXP,ul_Flags(a6) 
move.l a6,d0 
--DANE  DEFINIUJACE NASZA  BIBLIOTEKE-- rts 
DataTable: ul_Close: 
dc.b $e0 ; procedura wywolywana gdy jest wywolywana procedura 
de.b $00 CloseLibrary () i gdy ilosc otworzen biblioteki jest rowna 
dów $8 zero to biblioteka zostanie usunieta (procedura Expunge) 
dEk 9 clr.l do 
? subqiw 41,LIB OPENCNT(a6) 
do.b 0 bne.s ULCL_End 
dc.b $e0 btst 4 LIBB DELEXP,ul_Flags(a6) 
dc.b $00 bne.s ul_Expunge 
dc.w $9 ULCL_End: 
deb 0 jĘ 
dc.b o SCG GE 
ul_Expunge: 
de.b $c0 movem.l d1/a5-a6,-(sp) 
dc.b 0 move.l a6,a5 
dc.w LN_NAME move.l Exec.w,a6 
dc.l LibName tst.w LIB_OPENCNT(a5) 
beq.s ULEX_Remove 
dc.b $e0 bset 4 LIBB DELEXP,ul_Flags(a5) 
: clr.l do 
doch 30 bra.s _ ULEX End 
dc.w LIB _ FLAGS ULEX_Remove: 
dc.b LIBE_SUMUSED+LIBF_ CHANGED move.l ul_SegList(a5),d2 
dc.b [o] move.l a5,a1 
jsr Remove(a6) 
clr.l do 
ae) de move.l a5,a1 
deb  $00 move.w _ LIB_NEGSIZE(a5),do 
dc.w LIB_ VERSION sub.l dO,a1 
dc.w Version add.w LIB POSSIZE(a5),do 
jsr FreeMem(a6) 
dc.b $do move.l d2,d0 
; ULEX_End: 
sę zóż movem.l (sp)+,a1/a5-a6 
dc.w LIB_REVISION rts 
dc.w REVISION AE 
dc.b $c0 ul_Nuill: 
dc.b $00 moveq H0,d0 „procedura 
j „nic nie robiaca 
dc.w LIB_IDSTRING jednak jest to 
dc.l IDString ris :'czesc 
„skladowa kazdej 
dc.l [o ;biblioteki 
InitRoutine: „procedura inicjacji —PROCEDURY WLASNE-- 
;biblioteki 
move a5,-(sp) ChangeLED: ; nasza procedura 
move.l dO,a5 bchg 41,$bfe001 , zmiana filtrow 
move.| _ a0O,ul_SegList(a5) is 


tutaj moga znajdowac sie procedury np. otworzenie 

;pozostalych bibliotek i wpisanie adresow do Bazy | nnn 
„naszej biblioteki czy allokacja pewnych obszarow 

„roboczych na czas pracy naszej biblioteki. UWAGA!Procedury Expunge (usuń), Open (otwórz), 
Close (zamknij) oraz Null (nic) są stałymi składowymi 


move.l a5,d0 ARD OFICE a, ŻE 
move.l _ (sp)+.a5 każdej biblioteki i nie mogą być pominięte!!! 
rts 

--STANDARDOWE _ PROCEDURY—- Marcin „Duddie” Dudar 


.ul Open: 


W dzisiejszym „Kąciku...” poznamy algorytm sor- 
towania bąbelkowego, oraz jak zwykle garść nowych 
rozkazów. 

e Sxx <adres efektywny> „Set Acording to Condi- 

tion"” - ustawienie w zależności od warunku. 

Instrukcja ta testuje warunek określony polem „xx”, 
następnie w zależności od otrzymanego wyniku mo- 
dyfikuje bajt określony adresem efektywnym. Jeżeli 
warunek zostanie spełniony wspomniany bajt będzie 
posiadać wartość -1 (SIf), w przeciwnym przypadku zo- 
stanie skasowany (ustawiony na 0). 

Pole „xx” posiada analogiczne znaczenie, jak w przy- 
padku instrukcji skoków warunkowych i możliwe są 
następujące przypadki: 


SCC - ustawienie, jeżeli C=0 

SCS - ustawienie, jeżeli C=1 

SNE - ustawienie, jeżeli Z=O0 

SEQ - ustawienie, jeżeli Z=1 

SPL - ustawienie, jeżeli N=0 

SMI - ustawienie, jeżeli N=1 

SVC - ustawienie, jeżeli V=0 

SVS - ustawienie, jeżeli V=1 

SGE - ustawienie, jeżeli [N=O i V=0] albo [N=1 i V=1] 

SGT - ustawienie, jeżeli [N=1 i V=1 i Z=0] albo 
[N=0 i V=0 i Z=0] 

SHI - ustawienie, jeżeli C=0 i Z=0 

ŚLS - ustawienie, jeżeli C=1 albo Z=1 

SLE - ustawienie, jeżeli Z=1 lub [N=1 i V=0] lub 
[N=O i V=1] 


SLT - ustawienie, jeżeli [N=1 i V=0] lub [N=0 i V=1] 
SF  - ustawienie nigdy nie zostanie zrealizowane 
ST  - ustawienie wystąpi zawsze bez względu na znaczniki 


Znaczniki: 
Nie są modyfikowane. 

Przykład: 

SMI $40000 - jeżeli ustawiony będzie znacznik N, komorka 
$40000 zostanie ustawiona na $ff, w przeciwnym wypadku 
po wykonaniu tej instrukcji jej zawartość będzie równa O. 

e ABCD Dx,Dy „Add Decimal with Extend” - 

dodawanie dziesiętne z rozszerzeniem. -(Ax),-(Ay). 

Instrukcja ta dodaje w kodzie BCD bajt określony 
operandem źródłowym, do operandu przeznaczenia i tam 
też pozostawia wynik operacji. Dodawanie odbywasię z uwz- 
ględnieniem bitu rozszerzenia X. 

Istnieją jedynie dwa tryby adresowania tej instrukcji: 
1. zarówno operandem Źródłowym, jak i operandem 

przeznaczenia są rejestry danych. 

2. Operandy adresowane są przy pomocy trybu predek- 
rement. 

Czym jest kod BCD? Jest to sposób zapisu liczb 
dziesiętnych z wykorzystaniem kodu binarnego, w któ- 
rym cyfra dziesiętna przedstawiona jest za pomocą 
czwórki bitów. System ten jest bardziej „rozwlekły” niż 
dwójkowy ze względu na to, że nie są wykorzystane 
kombinacje bitów w zakresie 10 - 15 (w systemie 
dziesiętnym nie istnieją cyfry o takich wartościach!!!). 
Ze względu na to, że kod BCD dla mikroprocesora nie 
jest naturalnym systemem liczenia, operacje arytme- 


tyczne wykonywane w tym systemie zajmują więcej 
czasu. Większość procesorów posiada jednak wbu- 
dowane instrukcje operowania na tym kodzie, gdyż jest 
on bardzo rozpowszechniony we wszelkiego rodzaju 
urządzeniach elektronicznych: zegarki, układy zlicza- 
jące, wyświetlacze cyfrowe. 

A oto kilka przykładów zapisu liczb w kodzie BCD: 


dec 34 = 00110100 BCD 
dec 99 = 10011001 BCD 
dec 10 = 00010000 BCD 
dec 58 = 01011000 BCD 
Znaczniki: 


X - Ustawiany, gdy wystąpi przeniesienie. 

N - Nie używany. 

Z - Zerowany, gdy wynikiem była liczba różna od zera. 
W przeciwnym wypadku nie zmieniany. 

V - Nie używany. 

C - Ustawiany, gdy wystąpiło przeniesi: 'ie. 

Przykład: 

abcd dO,d2 - liczba zapisana w kodzie BCD, w wymiarze 

bajtu (dwie cyfry) zostanie dodana do liczby zapisanej w 

rejestrze d2 i tam też zostanie umieszczony wynik. 

« SBCD Dx,Dy „Substract Decimal with Extend” - 
odejmowanie dziesiętne z - (Ax), - (Ay) rozszerze- 
niem. 

Instrukcja ta wykonuje odejmowanie w kodzie BCD, 
wraz z bajtem rozszerzenia X. Tryby adresowania są 
analogiczne do tych przedstawionych przy ABCD. Odej- 
mowanie można wykonywać na operandzie wielkości 
bajtu, czyli dwóch cyfrach dziesiętnych. 


Znaczniki: 
X - Ustawiany w przypadku wygenerowania pożyczki. 
N - Nie używany. 
Z -Zerowany, gdy wynik jest różny od zera. 
W przeciwnym wypadku nie zmieniany. 
V - Nie używany. 
C - Ustawiany w przypadku wygenerowania pożyczki. 
Przykład: 
SBCD -(a0),-(a1) - rejestry adresowe zostaną zmniejszone 
o 1, a następnie bajt wskazywany przez a0 zostanie odjęty 
w arytmetyce BCD od bajtu wskazywanego przez al. 
Zastosowanie tego trybu adresowania, oraz specy- 
ficznego sposobu działania znacznika Z pozwala na or- 
ganizowanie pętli, których zadaniem będzie wykonywanie 
obliczeń na liczbach przekraczających wielkość bajtu. 
e NBCD <adres efektywny> „Negate Decimal with 
Extend” - negacja BCD z rozszerzeniem. 
Instrukcja 1a powoduje negację bajtu określonego 
adresem efektywnym, w kodzie BCD. 


Znaczniki: 
X - Ustawiany w przypadku wygenerowania pożyczki. 
N - Nie używany. 
Z -Zerowany, gdy wynik jest różny od zera, 
w przeciwnym wypadku nie zmieniany. 
V - Nie używany. 
C -Ustawiany w przypadku wygenerowania pożyczki. 
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Przykład: 
NBCD (a0) - bajt wskazywany przez rejestr aQ zostanie 
zanegowany w kodzie BCD. 
e EXT Dx „Sign Extend” - rozszerzenie znaku. 
Instrukcja ta rozszerza bit świadczący o znaku liczby. 
W przypadku operacji na słowie bil 7 rejestru danych 
zostanie skopiowany do bitów od 8 do 15. Natomiast 
jeśli rozmiar określimy jako „długie słowo” bit 15 zosta- 
nie skopiowany do bitów 16-31. EXT bardzo często 
używana jest wraz z instrukcjami dzielenia, gdyż te osta- 
tnie nie dają 32-bitowych wyników. 


Znaczniki: 
X - Nie zmieniany 
N - Ustawiany zgodnie z rozszerzanym bitem. 
Z - Ustawiany, gdy wynikiem operacji bylo zero. 
V - Zerowany. 
C - Zerowany. 
Przykład: 
move.|  4:$0000ffe2,dO 
ext.l dO - po wykonaniu tych dwóch rozkazów zawartość 
dO będzie równa $ffffffe2. 

Jak już wspomniałem na początku, przedstawię 
dzisiaj procedurę sortowania bąbelkowego. Metoda ta 
wykorzystywana jest stosunkowo często, głównie ze 
względu na jej prostotę. Naturalną konsekwencją tego 
jest dość długi czas wykonywania, jednak w przypadku 
niewielu liczb nie ma to istotnegoznaczenia. Czytelni- 
kowi proponuję rozbudowanie tego krótkiego progra- 
mu na sortowanie nie tylko samych liczb, ale również 
tytułów plików, dat utworzenia zbiorów itp. I jeszcze 
jedna uwaga: program działa w arytmetyce bez znaku. 
Oznacza to, że liczba $ff (zazwyczaj interpretowana jako 
-1) okaże się większa od np. $1c. W przypadku, gdy 
użytkownika nie będzie satysfakcjonowało takie 
rozwiązanie wystarczy zmienić rozkaz BCC na BGT. 

A oto procedura: 
3k sk sk >k sk 3k sk sk sk 3k sk sk sk >k sk 3k 3k >k Sk >k 


*Sortowanie bąbelkowe * 
sk 3% sk >k sk 3k > sk >k 2k sk 3 3 >k sk >k 3k >k 3 >k 
N=8 jllosc elementow tablicy do sortowania 
,pomniejszona o 1 


Sortowanie: 


lea Table(pc),a0 
Start: 
moveq  40,d0 
moveq  %0,d2 
DoMain: 
move.b $01(a0,dO.l) ,d1 
cmp.b  (a0,dO.l),d1 
bcc NieWymien 
move.b  (a0,d0.l),$01 (a0,dO.I) 
move.b d1,(a0,dO.I) 
moveq  4-1,d2 1 oznacza, ze wszystkie 
inie zostaly jeszcze 
;uporzadkowane 
NieWymien: 
addq.l  ś1,d0 
cmp.l fN,dO 
bne DoMain 
tst.l d2 
bmi Start 
moveq  %0,d0 
rts 


Table: 
de.b 17,3,6,8, 1,9,7,2,5 
Jak działa algorytm sortowania bąbelkowego? Otóż 
przeszukuje on tablic wartości, porównując ze sobą 
kolejne dwa bajty. W przpadku, gdy ułożone są w ko- 
lejności malejącej (pierwszy większy od drugiego) 
zamienia je miejscami, inaczej pobiera dwa następne. 
Takich przebiegów robi tyle, aż stwierdzi, że wszystkie 
bajty ułożone są poprawnie (tzn. każdy następny jest 
większy, lub równy od poprzedniego) i wraca z pod- 
programu. 
Przesortujmy teraz następującą sekwencję bajtów 
$02,$08,$07,$01 według powyższego algorytmu. Mikro- 
„wykona następujące kroki: 


Bajty 


$02 $08 $07 $01 


$02 $08 $07 $01 
$02 $07 $08 $01 
$02 $07 $01 $08 
$02 $07 $01 $08 
$02 $01 $07 $08 
EH $01 $02 $07 $08 
o | s01 02 sr sw | 


DrOCESOr 


sortowane Bajty aktbalnie* Zamieni? 


porównywane 
$02 i $08 
$08 i $07 
$08 i $01 
$02 i $07 
$07 i $01 
$07 i $08 
$02 i $01 
$02 i $07 
$07 i $08 


Proszę zauważyć ileż porównań było niezbędnych do 
przesortowania tylko czterech bajtów! - a przy tym ileż 
z nich zostało wykonanych wydawało by się może 
niepotrzebnie. Nie dziwmy się zatem, jeżeli do przesor- 
towania kilku kilobajtów komputer potrzebować będzie 
kilkunastu minut. A może uda Wam się przyspieszyć tą 
procedurę? 


„K.K.” Kobuz 


ZPRADZAARTAROCAEDERROPRRIZERIEZEBZPRREEESTARĘSKESKACĄ 
COMMODORE 64 


AMIiCOS COMPUTER 
ul. Wodzickiego 84/90/27 
42-200 CZĘSTOCHOWA 
TEL 22-22-38 
ATRAKCYJNE PROGRAMY NA KASETACH 
CIEKAWE PROGRAMY NA DYSKACH 
KATALOGi GRATiS  (koperta+znaczek) 


WYSYŁKA POCZT. EKSPRESOWA 
 RSYZRZZARICZEZRZZREKZKĘEZEE RTTADADNERO NE. 
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ź 


Ę PPN NE 
PZPEŁEJNE 
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+ 


4332876380 


Korespondencyjny 
Klub AMIGA 


ul. I Armii Wojska Polskiego 4/41 
43-300 Bielsko - Biala 


e Fachowe porady. 

e Czyste dyskietki. 

e Darmowa prenumerata klubowej dyskietki. 

e Wolny dostęp do klubowego banku programów. 
e Szczegóły po nadesłaniu koperty zwrotnej! 
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W dzisiejszym odcinku tego cyklu chciałbym przyszłym 
„demopisarzom” udzielić kilku rad i wskazówek, które to 
- być może - sprawią, iż ich produkty staną się bardziej 
efektywne. Kilkakrotnie pisałem już na łamach „64+4', 
ale jeszcze raz powtórzę, że najważniejszą sprawą dla 
kodera jest oszczędność czasu. Cała filozofia napisania 
dema sprowadza się do tego, aby wszystkie procedury 
wykonywały się szybciej niż jedną ramkę. W tym celu kode- 
rzyuciekają się do wielu trick'ów, i im tylko znanych metod, 
aby przyspieszyć wektorówkę, sinus scrolla lub wektor 
bobsy. Pamiętajmy, że nie ma takiej procedury, której nie 
można by przyspieszyć. 

Zastanówmy się teraz, jakie cechy powinno zawierać 
dobrze napisane demo. 

. Starajmy się jak najmniej używać rozkazów skoków 
bezwarunkowych. Obniżają one znacznie czytelność 
programów, dlatego w programie zawierającym 
wiele takich rozkazów, trudno jest wykryć nawet 
proste błędy. W przypadku, gdy ominięcie takiego 
rozkazu jest niemożliwe próbujmy JMP zastąpić 
BRA. Ten drugi jest krótszy i zarazem szybszy. 

2. Rozkazy mnożenia i dzielenia zastępujmy 
dodawaniem, odejmowaniem, obrotami lub 
przesunięciami bitów, ewentualnie tablicujmy wyniki. 
Zajmie to stosunkowo dużo miejsca, ale wykonywane 
będzie ok. 8 razy szybciej!!! Instrukcje MULU, MULS, 
DIVU, DIVS wykonywane są przez mikroprocesor naj- 
wolniej. 

3. W miarę możliwości rozbuduj my w swoim demie sieć 
podprogramów. Uzyskamy przez to dobrą czytel- 
ność oraz oszczędność pamięci. Piszmy je tak, aby 
po małych przeróbkach mogły współpracować z 
innymi naszymi demami. W ten sposób stworzymy 
bank własnych procedur i napisanie każdego 
następnego programu będzie kwestią pół godziny. 

4. W swoich sourcc'ach nie oszczędzajmy miejsca na 
komentarze. Na pewno po pewnym czasie zdarzy się, 
że zcchcemy udoskonalić stare procedury. Jeżeli 
uprzednio nie zaopatrzyliście ich w znaczące 
etykiety i objaśnienia do poszczególnych części, za- 
pewniam, iż sporo czasu upłynie zanim zorien- 
tujecie się „o co w tym wszystkim chodzi”. 

5. Przerwania używajmy tylko w ostateczności. Ich 

wygenerowanie, oraz dodatkowe procedury obsługi 

zabierają procesorowi cenny czas. 

Pamiętajmy, że włączenie dodatkowych bit-pla- 

ne'ów, sprite'ów lub innych kanałów DMA również 

pochłania dużo czasu. Warto czasem zrezygnować z 

trybu wysokiej rozdzielczości, aby przyspieszyć 

pracę procedur. 

Wszystkic operacje i obliczenia wykonujmy nie 

korzystając z przechowywania wyników pośrednich 

w komórkach pamięci. O ile to możliwe wykorzy- 

stujmy za wszelką cenę rejestry procesora zarówno 

w przypadku operandów źródłowych, jak i przczna- 

czenia. 


= 


A 


z 


Krzysztof Kobus „K.K.” 


AMIGA 


Witam po raz kolejny w naszej rubryce dla graczy - 
leniwców, dziś znów nadgryziemy parę gier bez użycia 
ostrych narzędzi. 


CONTINENTAL CIRCUTT 


W czasie, gdy zapali się pierwsze czerwone Światło 
pchnij joystick do przodu. Gdy zapali się drugie światło 
czerwone puść joysick. Po zapaleniu się zielonego pchnij 
joystick do przodu. Im szybciej zareagujesz, tym lepsze 
będziesz uzyskiwał przyspieszenie. 


DATASTORM 


Po załadowaniu poczekaj, aż ukaże się tabela wyni- 
ków. Teraz wciśnij F 10 by otrzymać tajną wiadomość. 


DENARIS 
By włączyć wersję treningową wciśnij „Z, po wyborze 
gry. Następnie podłącz mysz do portu 2 i trzymaj wciś- 
nięty prawy przycisk w czasie, gdy gra się ładuje. 
DRIVING FORCE 


Gdy pojawi się główne menu, użyj pointera i click'nij 
na dwóch literach „I” w napisic „Driving”. Gdy rozpo- 
czniesz grę samochód nie będzie zjeżdżał z drogi, ale 
będzie mógł być uderzony przez innych. 


DOGS OF WAR 
W czasie gry wpisz „TIMBO”. Teraz naciskając FS 
wyłączasz kolizję sprite'ów. 
DRAGONS SCAPE 
Wciśnij TAB, a następnie „2” by przenieść się do 
następnej strefy. 
DRAGON SPIRIT 


Zatrzymaj grę wciskając F9. Teraz wpisz „DRAGON 
HEAD" i wciśnij F10. 


NARCO POLICE 
Na małym monitorze w czasie gry wprowadź następu- 
jące hasła: 
NOENEMIG - brak przeciwników, 
MUNICION - odnawia zapas amunicji. 


Dla lubiących szukać podam, że nie są to jedyne hasła. 
Jeśli dobrze poszukaciew programie to możecie znaleźć 
hasła do wyłączenia kamer i karabinów maszynowych, 
oraz kilka innych. 


Mr. Raf 
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Poprzedni odcinek zawierał: typy zmiennych, for- 
matowanie wydruków - funkcją printfQ).W tej części cyklu 
porozmawiamy o tablicach i przyjrzymy się kilku nastę- 
pnym instrukcjom języka C. 


Język C pozwala definiować tablice (a więc szereg 
danych zapisanych pod wspólną nazwą; dostęp do 
określonej danej następuje poprzez odwołanie do nazwy 
i podanie indeksu) według następujacego wzoru: 


int Tablica[100]; /* To jest tablica stu elementow */ 


Definicja powyższa określa tablicę zmiennych typu ; 


int, o 100 elementach, zapisaną pod nazwą Tablica. 


UWAGA! 
Indeks, a więc wartość pomiędzy nawiasami [ ], w 
definicji określa ilość elementów. Jednakże 
elementy te są indeksowane od ZERA! W naszym 
przypadku pierwszy element tablicy to Tablica[0], 
ostatni - Tablica[99]. 


Tekst umieszczony pomiędzy znaczkami: /*...*/ jest 
nazywany komentarzem. Do dobrego zwyczaju należy 
umieszczanie komentarzy w kluczowych miejscach 
programu. Nie chodzi tu o komentarż przy każdej in- 
Strukcji. Ważne jest, by opisywał on deklarowane 
zmienne, by znajdował się na początku deklaracji funkcji 
i komentował jej działanie itp. O tym, że jest to konie- 
czne, przekona się każdy, kto w dwa miesiące po zakoń- 
czeniu pisania programu nie będziew stanie dokonaćw nim 
żadnej poprawki. 


Rozważmy przykład: 
main() 
t 
int loop; [* Zmienna uzywana w instrukcji for */ 


int Tablica[10]; /* Tablica dziesieciu elementow */ 


for ( loop=0; loop<10; loop+ ++ ) 


Tablicafloop] = loop; zy 
printf ('NnElement Tablica[%d] = %d", loop, 
fTablica[loop]); 
ł 
) 


Program deklaruje dwie zmienne: loop oraz 
dziesięcioelementową tablicę Tablica[10]. Do dyspozy- 
cji mamy więc 1(loop) + 10(Tablica) = 11 danych. 
Każdemu elementowi tablicy zostaje nadana wartość 
równa indeksowi, tj. element Tablica]0] jest równy O, 
element Tablica[ 1] jest równy 1, element Tablicaf2] jest 
równy 2 itd. 

Nadanie wartości poszczególnym elementom tablicy 
następuje wewnątrz instrukcji for. Funkcja ta powoduje 


wykonanie fragmentu programu określoną ilość razy. 
Jeżeli fragment, który ma być wykonywany, składa się 
zwięcej niż jednej instrukcji, musi zostać ujętyw nawiasy 
t », jeżeli składa się tylko z jednej instrukcji, nawiasy 
można pominąć. 


Przykład: 


main() 


int loop; /* Zmienna uzywana w instrukcji for */ 
int Tablica[10]; /* Tablica dziesieciu elementow */ 


for ( loop=0; loop<10; loop+ + ) 
Tablica[loop] = loop; 


Tu wewnątrz instrukcji for mamy tylko jedną 
instrukcję - nadania wartości (przypisania). 
Format instrukcji for jest następujący: 


for (PRZYPISANIE, WARUNEK, SKOK) 
t 


instrukcje... 


ł 


Tak więc instrukcje for z poprzednich przykładów 
można przeczytać jako: nadaj zmiennej loop wartość O 
( loop=Q; ), pętlę wykonuj dopóki zmienna loop jest 
mniejsza od 10 ( loop; ), a po każdym wykonaniu pętli 
zwiększ wartość zmiennej loop o jeden ( loop+ + ). 
Operator + + jest operatorem inkrementacji i zwiększa 
wartość zmiennej o jeden. 


UWAGA! 
Zapis 

loop+ +; 
oznacza w tym wypadku: zwiększ o jeden wartość 
loop PO wykonaniu pętli. 
Zapis 

+ +loop; ; 
oznaczałby: zwiększ o jeden-wartość loop PRZED 
wykonaniem pętli. W tym przypadku program nie 
nadawał by wartości zmiennej Tablica[0]. 
Operator zmienna+ + nazywany jest operatorem 
postinkrementacji, operator ++zmienna jest 
operatorem preinkrementacji. Analogicznie do 
++ działa operator --, jednakże efektem jego 
działania jest zmniejszenie wartości zmiennej o 
jeden. 


Instrukcja for jest jednym z pożyteczniejszych narzę- 
dzi przy pisaniu programu. Warto zwrócić uwagę, że w 
języku C instrukcja ta posiada większe możliwości niż 
analogiczna np. w BASIC'u. Dlaczego? Otóż nigdzie nie 
jest powiedziane, że umieszczone w instrukcji for 
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parametry muszą dotyczyć jednej zmiennej! Oznacza to, 
że możemy tej instrukcji używać do przypisania wartości 
jakiejś zmiennej, jednakże do warunku zakończenia 
pętli można użyć innej zmiennej, a jako skok podać 
dowolne wyrażenie, np. wartość zwracaną przez jakąś 
inną funkcję itp. 

Przykład: 


for ( loop=0; error!=1; ) 


instrukcje... 


ł 


Tu nadano zmiennej loop wartość zero (np. wymaga 
tego jakaś funkcja czy warunek wewnątrz pętli), przy 
czym opuszczenie pętli for nastąpi dopiero wtedy, gdy 
zmienna error jest równa jeden ( operator != znaczy 
"różny od"). Jest Oczywiste, że wewnątrz pętli powinna 
znajdować się jakaś funkcja lub wyrażenie, które by 
modyfikowało zmienną error, w przeciwnym razie pętla 
byłaby wykonywana w nieskończoność. W powyższym 
przykładzie pominięty został skok zmiennej! 

A oto inny, jeszcze ciekawszy sposób użycia for: 


for (;;) 
t 
ł 


Pominięto tu WSZYSTKIE parametry pętli! Taka 
pętla jest po prostu pętlą nieskończoną! I często 
przydaje się w programach. 

Przedstawimy teraz inne pętle dostępne w języku C - 
instrukcje while i do...while. 

Format instrukcji while jest następujący: 


while ( warunek ) 


instrukcje... 


, 


Oznacza ona polecenie: wykonuj instrukcje zawarte w 
pętli dopóki warunek jest prawdziwy. W tym sensie jest 
ona odpowiednikiem for Gwarunek;). Wykonanie pętli 
odbywa się następująco: najpierw sprawdzany jest waru- 
nek, a potem, jeżeli jest on prawdziwy, następuje wyko- 
nanie pętli. Tak więc wnętrze instrukcji while w 
szczególnym przypadku może w ogóle nie być 
wykonane! 

Zobaczmy, jak wygląda pierwszy przykład napisany 
przy użyciu while: 


main() 
ł 
int loop; 
int Tablica[10]; 


/* Zmienna uzywana w instrukcji for */ 
/* Tablica dziesieciu elementow */ 


loop=0; 
while ( loop < 10) 


loop+ +; /* Zwiekszenie indeksu o jeden */ 

Tablicafloop] = loop; 

printf ('fnElement Tablica[%d] = %d", loop. 
Tablica[loop]); 


Przed wykonaniem pętli while następuje nadanie 
wartości zmiennej indeksującej ( loop=0; ). Pętla jest 
wykonywana dopóki loop jest mniejsze od 10. 
Zwiększanie loop następuje wewnątrz pętli... Ale, ale!!! 
Od czego są operatory inkrementacji? Zwiększanie 
zmiennej loop możemy przecież umieścić w ... warunku! 


main() 
1 
int loop; 
int Tablica[10]; 


/* Zmienna uzywana w instrukcji for */ 
I* Tablica dziesieciu elementow */ 


loop=0; 
while (loop++ < 10) 


Tablica[loop] = loop; 
printf ('MnElement Tablica[% d] = %d", loop, 
Tablica [loop]): 


ł 
ł 


Teraz pętla while wykonywana jest następująco: 
sprawdź warunek, po jego sprawdzeniu i wykonaniu 
pętli, zwiększ wartość loop o jeden. 

Tu uwaga o stylu. W miejscu, gdzie występuje 
operator inkrementacji lub dekrementacji warto go 
oddzielić spajcą! Oczywiście nie należy tej spacji 
umieszczać pomiędzy operatorem a argumentem. 
Chodzi o to, by pisząc np. 

c=za+++b;/* Fe, tak nie nalezy */ 

było wiadomo, o co chodzi, a więc czy jest to: 
c=at+ + b; 

lub 
c=a+ t+b; 

Stąd też zapis (loop+ + < 10 ),a nie (loop-+ + <10). 

Instrukcje while często wykorzystuje się do okre- 
ślania pętli nieskończonej: 


whiłe (1) 


instrukcje... 


ł 

Podobna do while jest pętla do... while o formacie: 
do 
) while ( warunek ); 


Jest ona analogiczna do while, z jednym wyjątkiem. 
Otóż najpierw jest wykonywana zawartość pętli, a dopiero 
potem sprawdzany warunek. Oznacza to, że zawartość 
pętli do...while jest wykonywana zawsze minimum raz. 

„W temacie” pętle to by było na tyle. Jeśli zajdzie 
potrzeba, dodatkowe informacje pojawią się przy kolej- 
nych przykładach. 

Wróćmy do tablic. Tablice w języku C są jedno- 
wymiarowe. Nic jednak nie stoi na przeszkodzie, by 
elementami tablicy były... tablice! Daje to możliwość 
definiowania tablic o dowolnych rozmiarach, np. 
Tablica[10] - Tablica jednowymiarowa o 10 
elementach  (0...9) 

Tablica dwuwymiarowa o 10*10=100 

elemetach (0...9, 0...9) 

Tablica[10][10][10] - Tablica trzywymiarowa o 10*10*10 
=1000 elementach (0...9, 0...9, O...9) 


Tablica[10][10] - 
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Oto krótki program używający dwuwymiarowej 
tablicy. Zostanie ona zadeklarowana różnymi 
wartościami (0 lub 1), a następnie jej zawartość zostanie 
wyświetlona na ekranie: 


/* Zaraz pojawi się szachownica */ 
main() 
1 
int x, y; [* Dwie zmienne do indeksowania tablicy */ 
char Szachownica[8][8]; 


[* Nadajemy wartości poszczegolnym 
elementom tablicy */ 
I* Pole czarne = O; pole biale = 1 */ 


for (Xx=0;x<8;x = x + 2) 
for(y=O;y<8;y=y +2) 
1 


Szachownica[x] ly] 
Szachownica [x] [y+1] 
Szachownica [x+1] [y] 
Szachownica [x+1] [y+1] 
) 

[* Wydruk na ekran */ 

for ( x=0; x<8; x+ + ) 


IkRna| 
O—* wO 


printf ("Mn"); 
for (y=O0,y<8;y++ ) 
if ( Szachownica[x][y] == 0) 
printf ("0"); 
else 
printf ("1"); 


ł 
printf (Mn); 
ł 


Pojawiła nam sięw tym przykładzie instrukcja warun- 
kowa if...else. Format if jest następujacy: 


if ( warunek ) 
instrukcje1... 


else 


t 


instrukcje2... 


, 


Oznacza ona: jeżeli (if) warunek jest spełniony, wy- 
konaj instrukcjęl, w przeciwnym razie (else) instru- 
kcjęż. Część instrukcji od słowa else włącznie jest 
opcjonalna i nie musi występować, np: 


if(i==5) 
printf ('nWyobrazcie sobie, ze zmienna i jest rowna 5*'); 


Konieczne jest odróżnienie OPERATORA 
PRZYPISANIA = (nadania zmiennej określonej 
wartości, np. x = 5) od OPERATORA 
PORÓWNANIA == (czy jest równe? np. x == 5 oz- 
nacza nie nadaj x wartość 5, lecz CZY X JEST RÓWNE 
5). Naprawdę NALEŻY na to uważać, bo dostępne 
kompilatory na Amigę nie raczą nas ostrzec o możli- 
wości wystąpienia takiego błędu. 


Jarosław Chrostowski 


W tym miesiący dotarły do nas kolejne prośby o pomoc 
w grach typu Adventure. Niektóre z odpowiedzi możecie 
znaleźć w starych numerach „64 plus 4”. Poszukajcie! 

Mam nadzieję, że weźmiecie udział w naszej zabawie 
w podpowiedzi. Tym razem nie publikujemy odpowie- 
dzi bo ich nie znamy! Czekamy na listy od czytelników - 
na pomocną dłoń. Przypominam, że pomocy udzielamy 
zaznaczając kod prośby np. jeśli ktoś z Waswie co należy 
zrobić w grze Larry II to odczytuje kod (tu A2) pisze list 
z podpowiedzią i zaznacza „Odpowiedź na A2”. 


RATUNKUUUUU!!! 


Police Quest I - jestem w biurze szefa Doodley'a 
i mam właśnie otrzymać nominację. Szef jednak nie 
może jej przeczytać bo na papierach usiadła kura. Co 
zrobić aby ją wypędzić i otrzymać nominację? Norbert 
Waligórski. A1. 


Leisure Suit Larry II - wchodzę do basenu i topię się. 
Czy gdzieś jest może jakieś koło ratunkowe? Adam 
Zurkowski. AŻ. 


Code Name „Iceman? - doszedłem do baru. Wiem, że 
muszę porozmawiać z brunetką. Jednak za każdym 
razem gdy się odzywam mąż blondynki wychodzi i „wali 
mnie w mordę”. Jak to zrobić aby mówić do blondynki? 
Michał Stawny. A3. 


Cruise For The Corpse - na zegarze mamy godzinę 
9:10, zebrane dwa przedmioty (dwa świstki papieru), 
przeprowadzone kilka rozmów i .... Zrozpaczona 
i u kresu Sił redakcja „64 plus 4”. A4. 


Sambor Kuźma 


UWAGA! Dotyczy kasety 
AMIGA VIDEO SHOW. 


Studio telewizyjne, które miało na nasze zięcenie 
przygotować kasetę AVS opóźniało jej przygotowanie. 
Kiedy przedstawiono gotową wersję okazało się, że jest 
tak niskiej jakości, iż nie nadaje się do powielania i 
dystrybucji. W związku z powyższym zwracamy 
wszystkim czytelnikom, którzy zamówili tę kasetę . 
pieniądze. Prosimy równocześnie o wstrzymanie się od 
jej zamawiania. Wszystkich zainteresowanych 
serdecznie _ przepraszamyi 
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DLA WSZYSTKICH 


PUBLIC DOMAIN PACK C-64 


Wrzesień 


strona A: 
Mega Demo grupy FLASH 
strona B: 


Hot Shot - magazyn dyskowy 
Code Sucker monitor - pr. użytkowy grupy 


PADUA 


Mountain Ride - gra w BASIC 


Październik 
strona A i B: 


MEGA DEMO „AIRDANCE 4" grupy T.A.T. 


X R R R R M RR RY RE R M R M 


PUBLIC DOMAIN PACK 
TAPE NR 1 


SINUSDATA - EDITOR 
FAST CRUNCHER V3 
ANAL S.C. IBEYOND 
VECTOR - VICTORY 
PUZZLENOID +4 
TUNE OF MONTH 41 
NIM 

STRZAŁKA 64+ 
LOGO - WRITER V.2.0 
CAN'T TOUCH IKU! 
INTRO PRV 
BONZIEED !! 

ZAX PACKIS 

READ THIS FIRST 
COMMERCIAL.BREAK 
290 SPRITES! 


KA M R EA 2 M WR MR R „M 


NOTE - ABOUT 

BAD NEWS NR2 

TO BAD NEWS... 
CONTACT CORNER! 
PROJEKT DUSZKÓW 
SYMPHONY NR 14 
SYMPHONY NR 15 
SYMPHONY NR 16 
SYMPHONY NR 17 
SYMPHONY NR 18 
SYMPHONY NR 19 
CRUISER/GIANTS 
NOTE > ANO < PADUA 
LET'S DYSP! 
FINALTAPE 

MUSIC - SEARCHER 
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PUBL.IC DOMAIN PACK 


TAPE NR 2 
TURBO * DISKNOTKA/PADUA 
PUBL. DOMAIN. INFO *- MEGA PACKER/T 
FONTGRUB 1.0 *_ MIST I/ VISION 
DREPTACZ BASIC * TTECHSCR 8DYSP 
LOAD DIS FIRSY * PLASMA - WORLD 
MACROASSEMBLER * VECTORBOBS... 
TURBOASSEMBLER * VECTOR - PLOTS 
RELOCATOR * FLI- UPSCROLL 
LOGOPAINTER 3! * BORDER - HIRES 
REASSEBLER * ROCK AROUND 
SPRITE - EDITOR * FACEWRITER 
FAST - CRUEL U.2.5 * CHAR EDIT 2+2 
HIGHLIFE NR5 * DISKNOTER 
AXEL NEWS NR1 * DESTINATION'91 
GWIAZDY * CONTACTDEMO/ORE 
FLIGRAPH 2.2/BML + FONTEDITOR 
NOTE TO FLI V.2.2 * THEEND 


PUBLIC DOMAIN PACK AMIGA 


Maj 

VIRUS X 5.0 

VIRUS TERMINATOR 
PARADOX - demo 
STORMCHILD - demo 
Moduły muzyczne: 

- MIAMI VOICE 

- ANTI ATARI SONG 


Czerwiec 

POWER BOOT - własne menu dysku 
DISK CODING SYSTEM - program do zabez- 
pieczania dysków 

Konwerter IFF - ANSI 

AUER NATION - demo 

Moduły muzyczne 

DOCS - opis gry ELWIRA 

LAMER DEFENCE Ę do wykrywania 

i niszczenia wirusów 

REWENG GO OF THE LAMER - grafika w 
trybie D HAM 


Lipiec 

Sanity - demo 

Amiga - Tanx (1Mb) - gra 

Littte Beau (1MB) - gra 

There is A Light/Tonid - moduies 


Sierpień 

Real 3D - demo nowego programu do 
raytraceing'u 

Moduł Muzyczny XTC STEREO 


Wrzesień 


MODUŁY MUZYCZNE dla programu TFMX: 
> R - TYPE 

> THE HOUSE OF TECHNO 

VIRUS EXPERT v181 + 143 

BOOT BLOCK! 

> BOOTX v 3.80 

> IMPLODER v 4.0 


Spis treści zestawów z poprzednich miesięcy - 
patrz wcześniejsze numery naszego pisma. 
Zestawy „64 plus 4 PUBLIC DOMAIN PACK" można 
zamawiać wpłacając na konto: Bank PKO SA Oddział 
w Bydgoszczy konto nr:5.09011-400522.7-136-11- 
111.0 następujących kwot: 20.000zł za” pojedyńczy 
zestaw dla C-64, 25.000zł za zestaw dla AMIGI. Kwoty 
te obejmują koszt dyskietki, koszty kopiowania, 
opakowania i przesylki pocztowej. Blankiety wpłat 
powinny być CZYTELNIE wypełnione i zawierać: imię 
i nazwisko, dokładny adres zamawiającego, skrót 
„PDP-64"(jeśli zamawiamy zestaw dla C-64) lub 
„PDP-A”(zestaw dla Amigi) - dane te prosimy 
umieszczać na wszystkich odcinkach dowodu 
wpłaty. W prenumeracie zestawy kosztują: PDP-64 - 
18.000zl (12 numerów 2i6tys zł), PDP-A - 22.000zł (12 
numerów 264tys zł), Prenumeratę można zawrzeć w 
dowolnym terminie na okres od 3 do 12 miesięcy (do 
końca roku kalendarzowego). Prenumerata może 
obejmować miesiące od początku roku - tzn. 
zamawiając całoroczną prenumeratę np. w 
pażdzierniku, w pierwszej przesyłce otrzymacie 
wszystkie poprzednie zestawy. 


ZAMÓW NIE ZWLEKAJ! 
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GWARANCJĘ SYSTEMATYCZNEGO 
OTRZYMYWANIA NASZEGO PISMA 
ZAPEWNIA TYLKO 


PRENUMIEKŃ 


Wśród wszystkich, którzy do 25 stycznia 1992 roku 
Jdecyduje data stempla pocztowego/ 
zamówiaą całoroczną prenumeratę 


ROZLOSUJEMY 


AMIGĘ CDTV! 
20 szt. joystick ów 
oraz 
100 upominków 
/o wartości ok. 20.000 zł każdy/ 


Od stycznia 1992 r. nasze pismo 
kosztować będzie 10.000 zł. Wszyscy 
którzy do 25 stycznia wykupią roczna 
prenumeratę mogą skorzystać ze zniżki 
wpłacając nie 120.000 zł, a tylko 
110.000 zł. 

Wpłaty należy przesyłać na konto: 
BANK PKO S.A. Bydgoszcz, konto nr 
5.09011-400522.7-136-11-111.0. 

Blankiety wpłat powinny być czytelnie 
wypełnione i zawierać następujące 
informacje: imię i nazwisko lub nazwę 
instytucji, dokładny adres zamawiającego, 
liczbę zamawianych egzemplarzy oraz 
okres prenumeraty. 


Gwiazdkowe upominki 
- szczegóły wewnatrz numeru 


M 
KP 


Lm 


r 


<GTORC MY OrOgTeh zyCzny, 


Tylko 50.000 zł kosztuje A RAÓCZNY edytor muzyczny wykorzystu- 
jący ogromne możliwości dźwiękowe komputera Commodore - 64. 
Oferowany zestaw zawiera dyskietkę lub taśmę magnetofonową 
z programem VOICETRACKER V4.0, trzydzieści demonstracji 
muzycznych, oraz dokładną instrukcję. UWAGA! Wersja mag- 
netofonowa tylko 40.000zł.! 

Przedsiębiorstwo ABUK posiada wyłączność na dystrybucję tego programu. 
Wszelkie kopiowanie programu i powielanie instrukcji jest zabronione. 
Nabywcy otrzymują rejestrowane kopie programu wraz z prawem nabywania 
nowych wersji po znacznie obniżonych cenach oraz wymiany dyskietki w razie 
uszkodzenia. Studiom komputerowym proponujemy zakup hurtowy (przy 
zakupie powyżej 10 kompletów udzielamy 20% rabatu). 

Chcąc stać się posiadaczem programu VOICETRACKER V4.0 wystarczy 
dokonać wpłaty 50.000zł (wersja dyskowa) lub 40.000zł (taśma) na konto: 
Bank PKO SA Bydgoszcz, konto nr: 5.09011-400522.7-136-11-111.0. 

Na blankiecie prosimy czytelnie podać swoje imię, nazwisko i adres wraz 
z dopiskiem „VV 4.0” uzupełnionym literką „T” - taśma lub „D” - dyskietka. 


